mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-18 02:29:19 +02:00
* fixed intermittent bug in overflow checking of subtractions
This commit is contained in:
parent
fff0683902
commit
26ab4ead33
@ -1407,7 +1407,11 @@ interface
|
|||||||
addn:
|
addn:
|
||||||
op := A_ADDO;
|
op := A_ADDO;
|
||||||
subn:
|
subn:
|
||||||
|
begin
|
||||||
op := A_SUBO;
|
op := A_SUBO;
|
||||||
|
if (nf_swaped in flags) then
|
||||||
|
swapleftright;
|
||||||
|
end;
|
||||||
muln:
|
muln:
|
||||||
op := A_MULLWO;
|
op := A_MULLWO;
|
||||||
else
|
else
|
||||||
@ -1460,7 +1464,10 @@ begin
|
|||||||
end.
|
end.
|
||||||
{
|
{
|
||||||
$Log$
|
$Log$
|
||||||
Revision 1.53 2004-11-26 12:17:04 jonas
|
Revision 1.54 2004-11-26 12:30:47 jonas
|
||||||
|
* fixed intermittent bug in overflow checking of subtractions
|
||||||
|
|
||||||
|
Revision 1.53 2004/11/26 12:17:04 jonas
|
||||||
* fixed overflow checking of unsigned multiplications
|
* fixed overflow checking of unsigned multiplications
|
||||||
|
|
||||||
Revision 1.52 2004/10/31 21:45:03 peter
|
Revision 1.52 2004/10/31 21:45:03 peter
|
||||||
|
Loading…
Reference in New Issue
Block a user