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

* fix warning in gas

Browse Source
This commit is contained in:
peter 2003-12-04 21:44:39 +00:00
parent 0d3948fc5f
commit 48b84272bf
1 changed files with 5 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
rtl/i386/i386.inc
View File

@ -260,15 +260,9 @@ var
asm asm
movl %edi,saveedi movl %edi,saveedi
movl %ebx,saveebx movl %ebx,saveebx
{$ifdef REGCALL}
movl %eax,%edi
movl %cx,%bx
movl %edx,%ecx
{$else}
movl Len,%ecx // Load len
movl Buf,%edi // Load String movl Buf,%edi // Load String
movw b,%bx movw b,%bx
{$endif} movl Len,%ecx // Load len
xorl %eax,%eax xorl %eax,%eax
testl %ecx,%ecx testl %ecx,%ecx
jz .Lready jz .Lready
@ -1426,7 +1420,10 @@ end;
{ {
$Log$ $Log$
Revision 1.54 2003-11-19 16:58:44 peter Revision 1.55 2003-12-04 21:44:39 peter
* fix warning in gas
Revision 1.54 2003/11/19 16:58:44 peter
* make strpas assembler function * make strpas assembler function
Revision 1.53 2003/11/11 21:08:17 peter Revision 1.53 2003/11/11 21:08:17 peter