Hi,
huh, why does the build suddenly fail?
Well, FPC 3.0.0 does not have the joStrict option.
It is only there in 3.1.1.
Perhaps there should be two fpc parser entries.
Best,
Benito
On 06.11.2016 17:34, Benito van der Zander wrote:
Hi,
it is better to use TJSONParser than GetJSON.
GetJSON is defined as:
procedure DefJSONParserHandler(AStream: TStream; const AUseUTF8:
Boolean; out
Data: TJSONData);
Var
P : TJSONParser;
begin
Data:=Nil;
P:=TJSONParser.Create(AStream,[joUTF8]);
try
Data:=P.Parse;
finally
P.Free;
end;
end;
with
procedure DefJSONParserHandler(AStream: TStream; const AUseUTF8:
Boolean; out
Data: TJSONData);
Var
P : TJSONParser;
begin
Data:=Nil;
P:=TJSONParser.Create(AStream,[*joStrict,*joUTF8]);
try
Data:=P.Parse;
finally
P.Free;
end;
end;
it should pass more
Best,
Benito
_______________________________________________
fpc-pascal maillist - [email protected]
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal
