.file "960301-1.c" .text .align 2 .globl bar .type bar, @function bar: link.w %a6,#0 move.l %d2,-(%sp) move.l 8(%a6),%d0 lea foo+1,%a0 move.b (%a0),%d1 moveq.l #15,%d2 and.l %d2,%d1 move.l %d1,oldfoo bfins %d0,(%a0){#4:#4} seq %d0 extb.l %d0 moveq.l #1,%d1 sub.l %d0,%d1 move.l %d1,%d0 move.l (%sp)+,%d2 unlk %a6 rts .size bar, .-bar .align 2 .globl main .type main, @function main: link.w %a6,#0 pea 1.w jbsr bar addq.l #4,%sp moveq.l #1,%d1 cmp.l %d0,%d1 jbeq .L4 jbsr abort .align 2 .L4: clr.l -(%sp) jbsr exit nop .size main, .-main .comm foo,2,1 .comm oldfoo,4,2 .ident "GCC: (GNU) 3.3.2"