.file "981019-1.c" .text .align 2 .globl ff .type ff, @function ff: link.w %a6,#0 movm.l #0x2030,-(%sp) move.l 16(%a6),%d2 tst.l 8(%a6) jbeq .L4 tst.l %d2 jbne .L13 .L4: lea f3,%a2 move.l %a2,%a3 .align 2 .L12: jbsr (%a2) tst.l %d0 jbeq .L6 tst.l %d2 jbeq .L12 jbsr f2 tst.l %d0 jbeq .L12 lea f1,%a2 jbsr (%a2) move.l 12(%a6),%d2 jbsr (%a3) tst.l %d0 jbne .L14 .L9: jbsr (%a2) .L6: tst.l %d2 jbeq .L1 jbsr f1 jbra .L1 .align 2 .L14: jbsr (%a2) jbra .L9 .align 2 .L13: jbsr f1 jbra .L4 .align 2 .L1: movm.l -12(%a6),#0xc04 unlk %a6 rts .size ff, .-ff .align 2 .globl main .type main, @function main: link.w %a6,#0 clr.l -(%sp) pea 1.w clr.l -(%sp) jbsr ff clr.l %d0 unlk %a6 rts .size main, .-main .local x.0 .comm x.0,4,2 .align 2 .globl f3 .type f3, @function f3: link.w %a6,#0 tst.l (x.0) seq %d0 extb.l %d0 neg.l %d0 move.l %d0,(x.0) unlk %a6 rts .size f3, .-f3 .align 2 .globl f1 .type f1, @function f1: link.w %a6,#0 jbsr abort nop .size f1, .-f1 .align 2 .globl f2 .type f2, @function f2: link.w %a6,#0 jbsr abort nop .size f2, .-f2 .ident "GCC: (GNU) 3.3.2"