.file "20020129-1.c" .text .align 2 .globl foo .type foo, @function foo: link.w %a6,#0 move.l %a2,-(%sp) move.l 8(%a6),%a1 move.l 12(%a6),%a2 tst.l 28(%a1) jbne .L2 move.l 28(%a2),%a0 move.l %a0,28(%a1) clr.l 28(%a2) tst.l %a0 jbeq .L2 .align 2 .L7: move.l %a1,4(%a0) move.l (%a0),%a0 tst.l %a0 jbne .L7 .L2: tst.l 28(%a2) jbne .L12 moveq.l #-1,%d0 cmp.l 12(%a1),%d0 jbeq .L13 .L9: moveq.l #-1,%d0 cmp.l 12(%a2),%d0 jbeq .L1 jbra .L12 .align 2 .L13: move.l 12(%a2),12(%a1) move.l 16(%a2),16(%a1) move.l %d0,12(%a2) clr.l 16(%a2) jbra .L9 .align 2 .L12: jbsr abort .align 2 .L1: move.l -4(%a6),%a2 unlk %a6 rts .size foo, .-foo .align 2 .globl main .type main, @function main: link.w %a6,#0 lea y,%a0 moveq.l #6,%d0 move.l %d0,(%a0) move.l #145,y+12 move.l #2448,y+16 moveq.l #-1,%d0 move.l %d0,x+12 move.l %a0,-(%sp) pea x jbsr foo clr.l -(%sp) jbsr exit nop .size main, .-main .comm x,32,2 .comm y,32,2 .ident "GCC: (GNU) 3.3.2"