Michael VAN CANNEYT пре 2 година
родитељ
комит
830ecb9eda
1 измењених фајлова са 1 додато и 1 уклоњено
  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