Http fetch to file doesn't work for some reason

This commit is contained in:
Ruben Shekspir 2019-05-05 13:58:18 +04:00
parent ab197c6483
commit 6c66d03769
6 changed files with 54 additions and 21 deletions

View file

@ -186,7 +186,7 @@ BEGIN
END Create;
BEGIN
NEW(jsonRecord);
(* NEW(jsonRecord);
jsonRecord := Create("{'foo': 'bar', 'test': 'test1', 'test2': {'sub': 'dub'}}");
keyFound := jsonRecord.GetTerminal(jsonRecord, "foo", testValue);
@ -194,6 +194,5 @@ BEGIN
IF keyFound THEN
Logger.Log('found KEY');
Logger.Log(testValue);
ELSE Logger.Log('Value for the Key is not found') END;
ELSE Logger.Log('Value for the Key is not found') END; *)
END JsonParser.