- Removed unused HandleEvent method.
[AROS.git] / arch / m68k-all / libgcc1 / _gtdf2.s
blob5cfe6c0a3945bc3f816916dd17887138410058c5
1 .text
2 .even
3 .globl __gtdf2
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