paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-30 11:29:14 +02:00
Code Issues Packages Projects Releases Wiki Activity

Lazutils add test for r65246 #7a69a2a702 (UTF-16 surrogate halves).

Browse Source 
git-svn-id: trunk@65247 -
This commit is contained in:
bart 2021-06-16 08:42:49 +00:00
parent 7a69a2a702
commit c144a64fe3
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
test/lazutils/testlazutf8.pas
View File

@ -165,6 +165,7 @@ begin
t(#$f0#$80#$80#$80,0,'invalid: 0 encoded as 4 byte');
t(#$f0#$8f#$bf#$bf,0,'invalid: $ffff encoded as 4 byte');
t(#$F7#$BF#$BF#$BF,0,'invalid 4 byte out of range');
t(#$ED#$A0#$80,0,'3 byte encoding for reserved UTF-16 surrogate halve');
end;
procedure TTestLazUTF8.TestFindUnicodeToUTF8;