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

* changed cdq to cltd in AT&T assembler block

Browse Source
This commit is contained in:
Jonas Maebe 1998-11-26 23:14:52 +00:00
parent 31cc13417a
commit fc52d94323
2 changed files with 10 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
rtl/dos/crt.pp
View File

@ -618,7 +618,7 @@ begin
asm asm
movzwl hz,%ecx movzwl hz,%ecx
movl $1193046,%eax movl $1193046,%eax
cdq cltd
divl %ecx divl %ecx
movl %eax,%ecx movl %eax,%ecx
movb $0xb6,%al movb $0xb6,%al
@ -983,7 +983,10 @@ end.
{ {
$Log$ $Log$
Revision 1.13 1998-08-26 10:01:54 peter Revision 1.14 1998-11-26 23:14:52 jonas
* changed cdq to cltd in AT&T assembler block
Revision 1.13 1998/08/26 10:01:54 peter
* fixed readln cursor position * fixed readln cursor position
Revision 1.12 1998/08/19 17:57:55 peter Revision 1.12 1998/08/19 17:57:55 peter

7
rtl/i386/i386.inc
View File

@ -616,7 +616,7 @@ begin
movb $0x2d,1(%edi) // put '-' in String movb $0x2d,1(%edi) // put '-' in String
incl %ecx incl %ecx
.LM2: .LM2:
cdq cltd
idivl %esi,%eax idivl %esi,%eax
addb $0x30,%dl // convert Rest to ASCII. addb $0x30,%dl // convert Rest to ASCII.
movb %dl,-12(%ebp,%ebx) movb %dl,-12(%ebp,%ebx)
@ -718,7 +718,10 @@ end;
{ {
$Log$ $Log$
Revision 1.31 1998-11-26 21:33:58 peter Revision 1.32 1998-11-26 23:15:08 jonas
* changed cdq to cltd in AT&T assembler block
Revision 1.31 1998/11/26 21:33:58 peter
+ FPC_BOUNDCHECK + FPC_BOUNDCHECK
Revision 1.30 1998/11/17 00:41:08 peter Revision 1.30 1998/11/17 00:41:08 peter