.file "paste2.c" .text .align 2 .globl glue .type glue, @function glue: link.w %a6,#0 move.l 8(%a6),%d0 unlk %a6 rts .size glue, .-glue .section .rodata .align 2 .LC7: .long 1 .section .rodata.str1.1,"aMS",@progbits,1 .LC6: .string "%:%:" .LC10: .string "Pasted digraph spelling" .LC8: .string "Digraph pasting" .LC2: .string "Recursive macros" .text .align 2 .globl main .type main, @function main: link.w %a6,#0 pea 12.w jbsr glue addq.l #4,%sp moveq.l #12,%d1 cmp.l %d0,%d1 jbne .L26 move.l #.LC6,%d0 moveq.l #1,%d1 cmp.l .LC7,%d1 jbne .L27 pea 5.w move.l %d0,-(%sp) move.l %d0,-(%sp) jbsr memcmp lea (12,%sp),%sp tst.l %d0 jbeq .L23 pea .LC10 .L25: jbsr puts jbsr abort .align 2 .L27: pea .LC8 jbra .L25 .align 2 .L26: pea .LC2 jbra .L25 .align 2 .L23: clr.l %d0 unlk %a6 rts .size main, .-main .ident "GCC: (GNU) 3.3.2"