Explorar el Código

* Char -> AnsiChar

Michael VAN CANNEYT hace 2 años
padre
commit
830ecb9eda
Se han modificado 1 ficheros con 1 adiciones y 1 borrados
  1. 1 1
      rtl/x86_64/strings.inc

+ 1 - 1
rtl/x86_64/strings.inc

@@ -19,7 +19,7 @@
 
 {$ifndef FPC_UNIT_HAS_STRCOMP}
 {$define FPC_UNIT_HAS_STRCOMP}
-function StrComp(Str1, Str2: PChar): SizeInt;assembler;nostackframe;
+function StrComp(Str1, Str2: PAnsiChar): SizeInt;assembler;nostackframe;
 asm
 {$ifndef win64}
         movq   %rsi,%rdx