mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-11 10:58:23 +02:00
* fixed div by zero check for qword mod qword
This commit is contained in:
parent
2633b4883f
commit
43e425072b
@ -105,8 +105,13 @@
|
||||
movl %ecx,%eax
|
||||
orl %ebx,%eax
|
||||
jnz .Lnodivzero
|
||||
{$ifdef REGCALL}
|
||||
movl %ebp,%edx
|
||||
movl $200,%eax
|
||||
{$else}
|
||||
pushl %ebp
|
||||
pushl $200
|
||||
{$endif}
|
||||
call HandleErrorFrame
|
||||
jmp .Lexit
|
||||
.Lnodivzero:
|
||||
@ -256,7 +261,10 @@
|
||||
|
||||
{
|
||||
$Log$
|
||||
Revision 1.5 2004-09-26 08:52:51 florian
|
||||
Revision 1.6 2004-11-21 16:41:16 florian
|
||||
* fixed div by zero check for qword mod qword
|
||||
|
||||
Revision 1.5 2004/09/26 08:52:51 florian
|
||||
* fixed overflow checking in qword multiplication
|
||||
|
||||
Revision 1.4 2004/07/25 11:50:39 florian
|
||||
@ -272,4 +280,4 @@
|
||||
* moved int64 asm code to int64p.inc
|
||||
* save ebx,esi
|
||||
|
||||
}
|
||||
}
|
Loading…
Reference in New Issue
Block a user