.file "20000412-3.c" .text .align 2 .globl z .type z, @function z: link.w %a6,#-36 move.b #48,-2(%a6) move.b #48,-33(%a6) move.b #15,-34(%a6) lea (-36,%sp),%sp move.l %sp,%a0 move.l -34(%a6),(%a0)+ move.l -30(%a6),(%a0)+ move.l -26(%a6),(%a0)+ move.l -22(%a6),(%a0)+ move.l -18(%a6),(%a0)+ move.l -14(%a6),(%a0)+ move.l -10(%a6),(%a0)+ move.l -6(%a6),(%a0)+ move.b -2(%a6),(%a0) lea (-36,%sp),%sp move.l %sp,%a0 move.l -34(%a6),(%a0)+ move.l -30(%a6),(%a0)+ move.l -26(%a6),(%a0)+ move.l -22(%a6),(%a0)+ move.l -18(%a6),(%a0)+ move.l -14(%a6),(%a0)+ move.l -10(%a6),(%a0)+ move.l -6(%a6),(%a0)+ move.b -2(%a6),(%a0) jbsr f unlk %a6 rts .size z, .-z .align 2 .globl main .type main, @function main: link.w %a6,#0 jbsr z moveq.l #96,%d1 cmp.l %d0,%d1 jbeq .L3 jbsr abort .align 2 .L3: clr.l -(%sp) jbsr exit nop .size main, .-main .align 2 .globl f .type f, @function f: link.w %a6,#0 move.b 8(%a6),%d0 cmp.b 44(%a6),%d0 jbne .L6 move.b 9(%a6),%d1 extb.l %d1 move.b 45(%a6),%d0 extb.l %d0 add.l %d1,%d0 jbra .L4 .align 2 .L6: moveq.l #70,%d0 .align 2 .L4: unlk %a6 rts .size f, .-f .ident "GCC: (GNU) 3.3.2"