.file "960302-1.c" .globl a .data .align 2 .type a, @object .size a, 4 a: .long 1 .text .align 2 .globl foo .type foo, @function foo: link.w %a6,#0 move.l %d2,-(%sp) move.l a,%d0 move.l %d0,%d1 jbpl .L7 addq.l #1,%d1 .L7: moveq.l #-2,%d2 and.l %d2,%d1 sub.l %d1,%d0 move.l %d0,%d1 jbpl .L8 addq.l #1,%d1 .L8: and.l %d2,%d1 sub.l %d1,%d0 move.l %d0,%d1 jbpl .L9 addq.l #1,%d1 .L9: and.l %d2,%d1 sub.l %d1,%d0 move.l %d0,%d1 jbpl .L10 addq.l #1,%d1 .L10: and.l %d2,%d1 sub.l %d1,%d0 move.l %d0,%d1 jbpl .L11 addq.l #1,%d1 .L11: and.l %d2,%d1 sub.l %d1,%d0 move.l %d0,%d1 jbpl .L12 addq.l #1,%d1 .L12: and.l %d2,%d1 sub.l %d1,%d0 move.l %d0,%d1 jbpl .L13 addq.l #1,%d1 .L13: and.l %d2,%d1 sub.l %d1,%d0 move.l %d0,%d1 jbpl .L14 addq.l #1,%d1 .L14: and.l %d2,%d1 sub.l %d1,%d0 clr.l %d1 tst.l %d0 jbeq .L1 moveq.l #1,%d1 cmp.l %d0,%d1 jbeq .L1 moveq.l #-1,%d1 .align 2 .L1: move.l %d1,%d0 move.l (%sp)+,%d2 unlk %a6 rts .size foo, .-foo .align 2 .globl main .type main, @function main: link.w %a6,#0 jbsr foo moveq.l #1,%d1 cmp.l %d0,%d1 jbeq .L16 jbsr abort .align 2 .L16: clr.l -(%sp) jbsr exit nop .size main, .-main .ident "GCC: (GNU) 3.3.2"