Added missing properties.
[tangerine.git] / arch / m68k-mac / libgcc1 / _ltsf2.s
blobc5c5d1ca013247db91fce023d3e2cedc74a10674
1 .text
2 .even
3 .globl __ltsf2
5 __ltsf2:
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 slt %d0
19 andl #1,%d0
20 negl %d0
21 rts