mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-17 15:29:23 +02:00
* single_cmp, comparison was reversed!
This commit is contained in:
parent
89fd9e9c5d
commit
5ad930412e
@ -696,7 +696,7 @@ XDEF SINGLE_CMP
|
|||||||
neg.l d1 { negate }
|
neg.l d1 { negate }
|
||||||
bchg #31,d1 { toggle sign bit }
|
bchg #31,d1 { toggle sign bit }
|
||||||
@cmplab2:
|
@cmplab2:
|
||||||
cmp.l d1,d0 { compare... }
|
cmp.l d0,d1 { compare... }
|
||||||
rts
|
rts
|
||||||
end;
|
end;
|
||||||
|
|
||||||
@ -911,8 +911,11 @@ end;
|
|||||||
|
|
||||||
{
|
{
|
||||||
$Log$
|
$Log$
|
||||||
Revision 1.1 1998-03-25 11:18:44 root
|
Revision 1.2 1998-06-05 12:33:16 carl
|
||||||
Initial revision
|
* single_cmp, comparison was reversed!
|
||||||
|
|
||||||
|
Revision 1.1.1.1 1998/03/25 11:18:44 root
|
||||||
|
* Restored version
|
||||||
|
|
||||||
Revision 1.5 1998/01/26 12:01:47 michael
|
Revision 1.5 1998/01/26 12:01:47 michael
|
||||||
+ Added log at the end
|
+ Added log at the end
|
||||||
|
Loading…
Reference in New Issue
Block a user