.file "930719-1.c" .text .align 2 .globl f .type f, @function f: link.w %a6,#0 move.l 12(%a6),%d1 move.l 16(%a6),%a0 tst.l 8(%a6) jbeq .L13 clr.l %d0 jbra .L1 .align 2 .L13: moveq.l #1,%d0 cmp.l %d1,%d0 jbne .L13 move.l %a1,%d0 tst.l %a0 jbne .L1 clr.b (%a0) jbra .L13 .align 2 .L1: unlk %a6 rts .size f, .-f .align 2 .globl main .type main, @function main: link.w %a6,#0 pea 1.w pea 1.w clr.l -(%sp) jbsr f clr.l -(%sp) jbsr exit nop .size main, .-main .ident "GCC: (GNU) 3.3.2"