[fpc-pascal] [Lazarus] Tests results of several pascal based JSON parsers
Anthony Walter
sysrpl at gmail.com
Fri Aug 30 22:42:24 CEST 2019
For those tracking the unicode issue, could you please verify the problem
does not present in my JsonTools library on compiler revisions and
platforms? I always get true (passed) with my library, but not with any
other library. Here is the relevant test:
function VerifyUnicodeChars: Boolean;
const
UnicodeChars = '{ "name": "Joe®Schmoe", "occupation": "bank teller \u00Ae
" }';
var
N: TJsonNode;
begin
N := TJsonNode.Create;
N.Parse(UnicodeChars);
Result := (N.Child(0).AsString = 'Joe®Schmoe') and (N.Child(1).AsString =
'bank teller ® ');
N.Free;
end;
begin
WriteLn('Handles unicode characters correctly: ', VerifyUnicodeChars);
end.
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.freepascal.org/pipermail/fpc-pascal/attachments/20190830/12faeb70/attachment.html>
More information about the fpc-pascal
mailing list