.text .globl csb~ .globl fat~ ECASE = 20. csb~: mov r3,-(sp) mov (r0)+,-(sp) mov (r0)+,r3 beq 1f 3: cmp (r0)+,r1 beq 2f tst (r0)+ sob r3,3b 1: mov (sp)+,r1 br 4f 2: tst (sp)+ mov (r0),r1 4: beq 5f mov (sp)+,r3 jmp (r1) 5: mov (sp)+,r3 mov $ECASE,-(sp) jmp fat~