|
|
@@ -41,7 +41,7 @@
|
|
|
|
|
|
{$ifndef FPC_UNIT_HAS_STRPCOPY}
|
|
|
{$define FPC_UNIT_HAS_STRPCOPY}
|
|
|
-function strpcopy(d : PAnsiChar;const s : string) : PAnsiChar;assembler;nostackframe;
|
|
|
+function strpcopy(d : PAnsiChar;const s : shortstring) : PAnsiChar;assembler;nostackframe;
|
|
|
const
|
|
|
{ used for an offset fixup for accessing the proc parameters in asm routines
|
|
|
that use nostackframe. We can't use the parameter name directly, because
|
Michael VAN CANNEYT