- Removed unused HandleEvent method.
[AROS.git] / arch / m68k-all / libgcc1 / _gtsf2.s
blob0c4356397b6c0d310e219490b5b37a1153fdcce3
1 .text
2 .even
3 .globl __gtsf2
5 __gtsf2:
6 moveml %sp@(4),%d0-%d1 | get u and v
7 tstl %d1 | check sign bit
8 bpl L_1
9 negl %d1 | negate
10 eorl #0x80000000,%d1 | toggle sign bit
11 L_1:
12 tstl %d0 | check sign bit
13 bpl L_2
14 negl %d0 | negate
15 eorl #0x80000000,%d0 | toggle sign bit
16 L_2:
17 cmpl %d1,%d0
18 sgt %d0
19 andl #1,%d0
20 rts