repo.or.cz
/
AROS.git
/
blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
log
|
graphiclog1
|
graphiclog2
|
commit
|
commitdiff
|
tree
|
refs
|
edit
|
fork
blame
|
history
|
raw
|
HEAD
NOTE => NOTES
[AROS.git]
/
arch
/
m68k-all
/
libgcc1
/
_ltdf2.s
blob
e9cb1e67890e67bac4f34e3f0cc24bace27c8380
1
.text
2
.even
3
.globl __ltdf2
4
5
__ltdf2
:
6
moveml
%
sp@
(
4
),%
d0-
%
d1
/%
a0-
%
a1 | get u
and
v
7
tstl
%
d0 | check sign bit
8
bpl L_1
9
negl
%
d1 | negate
10
negxl
%
d0
11
eorl
#0x80000000,%d0 | toggle sign bit
12
L_1
:
13
exg
%
a0
,%
d0
14
exg
%
a1
,%
d1
15
tstl
%
d0 | check sign bit
16
bpl L_2
17
negl
%
d1 | negate
18
negxl
%
d0
19
eorl
#0x80000000,%d0 | toggle sign bit
20
L_2
:
21
cmpl
%
d0
,%
a0
22
bgt
ge
23
blt
lt
24
cmpl
%
d1
,%
a1
25
bcc
ge
26
lt
:
27
moveq
#-1,%d0
28
rts
29
ge
:
30
clrl
%
d0
31
rts