diff options
| author | sergei <sergei@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2011-06-13 04:59:17 +0000 |
|---|---|---|
| committer | sergei <sergei@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2011-06-13 04:59:17 +0000 |
| commit | c453709fd1306663b562605617c07ecf46eb8e33 (patch) | |
| tree | 7d7d4ca656d46019d5970344d64df46aee21c81e /rtl/powerpc | |
| parent | 865cf475d6d680993371709036786aabec8bb4f8 (diff) | |
| download | fpc-c453709fd1306663b562605617c07ecf46eb8e33.tar.gz | |
* Promoted result type of FPC_PCHAR_LENGTH and FPC_PWIDECHAR_LENGTH to SizeInt.
+ Check for nil pointer in FPC_PWIDECHAR_LENGTH
git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@17733 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'rtl/powerpc')
| -rw-r--r-- | rtl/powerpc/powerpc.inc | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/rtl/powerpc/powerpc.inc b/rtl/powerpc/powerpc.inc index 140a67d5e5..7a8645e007 100644 --- a/rtl/powerpc/powerpc.inc +++ b/rtl/powerpc/powerpc.inc @@ -1005,7 +1005,7 @@ procedure fpc_pchar_to_shortstr(out res : shortstring;p:pchar);assembler;[public {$ifndef FPC_SYSTEM_HAS_FPC_PCHAR_LENGTH} {$define FPC_SYSTEM_HAS_FPC_PCHAR_LENGTH} -function fpc_pchar_length(p:pchar):longint;assembler;[public,alias:'FPC_PCHAR_LENGTH']; compilerproc; nostackframe; +function fpc_pchar_length(p:pchar):sizeint;assembler;[public,alias:'FPC_PCHAR_LENGTH']; compilerproc; nostackframe; {$include strlen.inc} {$endif FPC_SYSTEM_HAS_FPC_PCHAR_LENGTH} |