.file "20000818-1.c" .text .align 2 .globl main .type main, @function main: link.w %a6,#0 jbsr yylex clr.l -(%sp) jbsr exit nop .size main, .-main .align 2 .globl yylex .type yylex, @function yylex: link.w %a6,#0 movm.l #0x2030,-(%sp) lea input,%a3 lea ISALNUM,%a2 .align 2 .L9: jbsr (%a3) move.l %d0,%d2 move.l %d0,-(%sp) jbsr (%a2) addq.l #4,%sp tst.l %d0 jbne .L10 moveq.l #95,%d0 cmp.l %d2,%d0 jbeq .L9 jbra .L11 .align 2 .L10: move.l %d2,-(%sp) pea temporary_obstack jbsr obstack_1grow addq.l #8,%sp jbra .L9 .align 2 .L11: move.l %d2,%d0 movm.l -12(%a6),#0xc04 unlk %a6 rts .size yylex, .-yylex .align 2 .type input, @function input: link.w %a6,#0 clr.l %d0 unlk %a6 rts .size input, .-input .align 2 .type ISALNUM, @function ISALNUM: link.w %a6,#0 move.l 8(%a6),%a1 clr.l %d0 lea (-65,%a1),%a0 moveq.l #25,%d1 cmp.l %a0,%d1 jbcc .L15 lea (-97,%a1),%a0 cmp.l %a0,%d1 jbcc .L15 moveq.l #48,%d1 cmp.l %a1,%d1 jbne .L14 .align 2 .L15: moveq.l #1,%d0 .L14: unlk %a6 rts .size ISALNUM, .-ISALNUM .align 2 .type obstack_1grow, @function obstack_1grow: link.w %a6,#0 unlk %a6 rts .size obstack_1grow, .-obstack_1grow .comm temporary_obstack,4,2 .ident "GCC: (GNU) 3.3.2"