.file "920731-1.c" .text .align 2 .globl f .type f, @function f: link.w %a6,#0 move.l 8(%a6),%d1 sub.l %a0,%a0 moveq.l #1,%d0 and.l %d1,%d0 jbne .L3 .align 2 .L7: asr.l #1,%d1 addq.l #1,%a0 moveq.l #7,%d0 cmp.l %a0,%d0 jblt .L3 moveq.l #1,%d0 and.l %d1,%d0 jbeq .L7 .L3: move.l %a0,%d0 unlk %a6 rts .size f, .-f .align 2 .globl main .type main, @function main: link.w %a6,#0 pea 4.w jbsr f addq.l #4,%sp moveq.l #2,%d1 cmp.l %d0,%d1 jbeq .L10 jbsr abort .align 2 .L10: clr.l -(%sp) jbsr exit nop .size main, .-main .ident "GCC: (GNU) 3.3.2"