compile fix

HealthIntersections · Jan 2, 2024 · d7b31fe · d7b31fe
1 parent 3c79473
commit d7b31fe
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/library/fsl/fsl_fpc.pas b/library/fsl/fsl_fpc.pas
@@ -292,7 +292,7 @@ function unicodeChars(s : String) : TUCharArray;
   ss := '';
   while l > 0 do
   begin
-    ch := UTF8PCharToUnicode(p, cl);
+    ch := UTF8CodepointToUnicode(p, cl);
     result[i] := UnicodeChar(ch);
     ss := ss + IntToHex(ch, 4)+'.';
     inc(i);