.file "980612-1.c" .globl f .data .type f, @object .size f, 2 f: .byte 5 .zero 1 .text .align 2 .globl g .type g, @function g: link.w %a6,#0 lea f,%a0 move.l %a0,%d0 unlk %a6 rts .size g, .-g .align 2 .globl h .type h, @function h: link.w %a6,#0 moveq.l #-1,%d0 unlk %a6 rts .size h, .-h .align 2 .globl main .type main, @function main: link.w %a6,#0 move.l %a2,-(%sp) jbsr g move.l %a0,%a2 jbsr h move.b %d0,1(%a2) move.b (%a2),%d0 moveq.l #111,%d1 and.l %d1,%d0 moveq.l #2,%d1 cmp.l %d0,%d1 jblt .L4 jbsr abort .align 2 .L4: clr.l -(%sp) jbsr exit nop .size main, .-main .ident "GCC: (GNU) 3.3.2"