mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-19 14:19:31 +02:00
* changed cdq to cltd in AT&T assembler block
This commit is contained in:
parent
31cc13417a
commit
fc52d94323
@ -618,7 +618,7 @@ begin
|
||||
asm
|
||||
movzwl hz,%ecx
|
||||
movl $1193046,%eax
|
||||
cdq
|
||||
cltd
|
||||
divl %ecx
|
||||
movl %eax,%ecx
|
||||
movb $0xb6,%al
|
||||
@ -983,7 +983,10 @@ end.
|
||||
|
||||
{
|
||||
$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
|
||||
|
||||
Revision 1.12 1998/08/19 17:57:55 peter
|
||||
|
@ -616,7 +616,7 @@ begin
|
||||
movb $0x2d,1(%edi) // put '-' in String
|
||||
incl %ecx
|
||||
.LM2:
|
||||
cdq
|
||||
cltd
|
||||
idivl %esi,%eax
|
||||
addb $0x30,%dl // convert Rest to ASCII.
|
||||
movb %dl,-12(%ebp,%ebx)
|
||||
@ -718,7 +718,10 @@ end;
|
||||
|
||||
{
|
||||
$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
|
||||
|
||||
Revision 1.30 1998/11/17 00:41:08 peter
|
||||
|
Loading…
Reference in New Issue
Block a user