.file "960317-1.c" .text .align 2 .globl f .type f, @function f: link.w %a6,#0 move.l %d2,-(%sp) move.l 12(%a6),%d1 moveq.l #-1,%d2 move.l 8(%a6),%d0 lsl.l %d0,%d2 move.l %d2,%d0 neg.l %d0 and.l %d1,%d0 jbeq .L3 not.l %d2 and.l %d2,%d1 moveq.l #1,%d0 tst.l %d1 jbne .L1 .L3: clr.l %d0 .L5: .L1: move.l (%sp)+,%d2 unlk %a6 rts .size f, .-f .align 2 .globl main .type main, @function main: link.w %a6,#0 pea -1.w clr.l -(%sp) jbsr f addq.l #8,%sp tst.l %d0 jbeq .L7 jbsr abort .align 2 .L7: clr.l -(%sp) jbsr exit nop .size main, .-main .ident "GCC: (GNU) 3.3.2"