/ Decus C patch level 9, Compilation date: "Wed Jun 19 06:59:58 1991" .psect c~data .psect c~code _astsrv: jsr r5,csv~ jsr pc,_astset clr -(sp) jsr pc,_gtdp tst (sp)+ mov r0,-10(r5) .psect c~strn .2: .byte 102,145,145,160,7,40,40,105,106,116,40,75,40,45 .byte 144,12,0 .psect c~code mov -10(r5),-(sp) mov $.2,-(sp) jsr pc,_printf cmp (sp)+,(sp)+ mov $1,-(sp) jsr pc,_astx tst (sp)+ .1: jmp cret~ .psect c~data .even .psect c~code _main: jsr r5,csv~ .psect c~strn .4: .byte 110,145,154,154,157,0 .psect c~code mov $.4,-(sp) jsr pc,_puts tst (sp)+ mov $_astsrv,-(sp) mov $2,-(sp) mov $2,-(sp) mov $5,-(sp) jsr pc,_mrkt add $10,sp mov $5,-(sp) jsr pc,_stse tst (sp)+ .psect c~strn .5: .byte 102,171,145,0 .psect c~code mov $.5,-(sp) jsr pc,_puts tst (sp)+ .3: jmp cret~ .psect c~data .even .globl _printf .globl _astset .globl _astsrv .globl _main .globl _gtdp .globl _stse .globl _mrkt .globl _astx .globl _puts .globl csv~ .globl cret~ .psect c~code .even .psect c~data .even