repo.or.cz
/
tangerine.git
/
blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
log
|
graphiclog1
|
graphiclog2
|
commit
|
commitdiff
|
tree
|
refs
|
edit
|
fork
blame
|
history
|
raw
|
HEAD
added concrete implementations of putc(), getc(), getchar() and gets()
[tangerine.git]
/
arch
/
m68k-mac
/
libgcc1
/
_gtdf2.s
blob
5cfe6c0a3945bc3f816916dd17887138410058c5
1
.text
2
.even
3
.globl __gtdf2
4
5
__gtdf2
:
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
blt
le
23
bgt
gt
24
cmpl
%
d1
,%
a1
25
bls le
26
gt
:
27
moveq
#1,%d0
28
rts
29
le
:
30
clrl
%
d0
31
rts