ack/mach/pdp/libem/sbi.s

/ $Header$
.text
.globl sbi~
.globl unknown~

sbi~:
	mov	(sp)+,r1
	cmp	r0,$04
	bgt	1f
	cmp	r0,$02
	bgt	2f
	sub	(sp)+,(sp)
	jmp	(r1)
2:	sub	(sp)+,02(sp)
	sub	(sp)+,02(sp)
	sbc	(sp)
	jmp	(r1)
1:
	jmp	unknown~
added rcsid 1984-07-19 13:34:12 +00:00			`/ $Header$`
Initial revision 1984-07-19 12:51:00 +00:00			`.text`
			`.globl sbi~`
			`.globl unknown~`

			`sbi~:`
			`mov (sp)+,r1`
			`cmp r0,$04`
			`bgt 1f`
			`cmp r0,$02`
			`bgt 2f`
			`sub (sp)+,(sp)`
			`jmp (r1)`
			`2: sub (sp)+,02(sp)`
			`sub (sp)+,02(sp)`
			`sbc (sp)`
			`jmp (r1)`
			`1:`
			`jmp unknown~`