.file "950621-1.c" .text .align 2 .globl f .type f, @function f: link.w %a6,#0 move.l 8(%a6),%a0 clr.l %d0 tst.l %a0 jbeq .L2 moveq.l #-1,%d1 cmp.l (%a0),%d1 jbne .L2 cmp.l 4(%a0),%d1 jbne .L2 moveq.l #1,%d0 .align 2 .L2: unlk %a6 rts .size f, .-f .align 2 .globl main .type main, @function main: link.w %a6,#-12 moveq.l #-1,%d0 move.l %d0,-8(%a6) move.l %d0,-12(%a6) pea -12(%a6) jbsr f addq.l #4,%sp tst.l %d0 jbne .L4 jbsr abort .align 2 .L4: clr.l -(%sp) jbsr exit nop .size main, .-main .ident "GCC: (GNU) 3.3.2"