paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-14 18:29:13 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Fixed warnings.

Browse Source 
git-svn-id: trunk@9102 -
This commit is contained in:
yury 2007-11-03 12:22:54 +00:00
parent cc31f2d720
commit 4662eb98fc
2 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
rtl/i386/i386.inc
View File

@ -1021,7 +1021,7 @@ function fpc_pchar_length(p:pchar):longint;assembler;[public,alias:'FPC_PCHAR_LE
function get_frame:pointer;assembler;nostackframe;{$ifdef SYSTEMINLINE}inline;{$endif} function get_frame:pointer;assembler;nostackframe;{$ifdef SYSTEMINLINE}inline;{$endif}
asm asm
movl %ebp,%eax movl %ebp,%eax
end ['EAX']; end;
{$ENDIF not INTERNAL_BACKTRACE} {$ENDIF not INTERNAL_BACKTRACE}
@ -1035,7 +1035,7 @@ asm
jz .Lg_a_null jz .Lg_a_null
movl 4(%eax),%eax movl 4(%eax),%eax
.Lg_a_null: .Lg_a_null:
end ['EAX']; end;
{$define FPC_SYSTEM_HAS_GET_CALLER_FRAME} {$define FPC_SYSTEM_HAS_GET_CALLER_FRAME}
@ -1048,7 +1048,7 @@ asm
jz .Lgnf_null jz .Lgnf_null
movl (%eax),%eax movl (%eax),%eax
.Lgnf_null: .Lgnf_null:
end ['EAX']; end;
{**************************************************************************** {****************************************************************************
Math Math
@ -1063,7 +1063,7 @@ asm
cltd cltd
xorl %edx,%eax xorl %edx,%eax
subl %edx,%eax subl %edx,%eax
end ['EAX','EDX']; end;
{$define FPC_SYSTEM_HAS_SQR_LONGINT} {$define FPC_SYSTEM_HAS_SQR_LONGINT}
@ -1077,7 +1077,7 @@ asm
{$endif} {$endif}
{$endif} {$endif}
imull %eax,%eax imull %eax,%eax
end ['EAX']; end;
{$define FPC_SYSTEM_HAS_SPTR} {$define FPC_SYSTEM_HAS_SPTR}

2
rtl/win32/system.pp
View File

@ -51,7 +51,7 @@ type
const const
{ Default filehandles } { Default filehandles }
UnusedHandle : THandle = -1; UnusedHandle : THandle = THandle(-1);
StdInputHandle : THandle = 0; StdInputHandle : THandle = 0;
StdOutputHandle : THandle = 0; StdOutputHandle : THandle = 0;
StdErrorHandle : THandle = 0; StdErrorHandle : THandle = 0;