Home Explore Help
Sign In
pascal
/
freepascal.compiler
mirror of https://gitlab.com/freepascal.org/fpc/source.git
2
0
Fork 0
Files Issues 0 Wiki
Browse Source

* Char -> AnsiChar

Michael VAN CANNEYT 2 years ago
parent
706e090457
commit
5ce739135b
1 changed files with 1 additions and 1 deletions
Unified View Show Diff Stats
  1. 1 1
      rtl/x86_64/strings.inc

+ 1 - 1
rtl/x86_64/strings.inc
View File 

@@ -19,7 +19,7 @@
 
 
 
 {$ifndef FPC_UNIT_HAS_STRCOMP}
 
 {$ifndef FPC_UNIT_HAS_STRCOMP}
 
 {$define 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
 
 asm
 
 {$ifndef win64}
 
 {$ifndef win64}
 
         movq   %rsi,%rdx
 
         movq   %rsi,%rdx