ack/mach/z8000/libem/cmu4.s

.define cmu4
.sect .text
.sect .rom
.sect .data
.sect .bss
.sect .text

cmu4:
	popl	saveret, *RR14
	popl	RR0, *RR14
	popl	RR2, *RR14
	cpl	RR2, RR0
	ldk	R0, $0
	ldl	RR2, saveret
	jr	ULT, 1f
	jp	EQ, *RR2
	inc	R0
	jp	*RR2
1:	dec	R0
	jp	*RR2
* empty log message * 1985-01-08 11:48:43 +00:00			`.define cmu4`
new version for new assembler syntax 1987-01-19 10:51:50 +00:00			`.sect .text`
			`.sect .rom`
			`.sect .data`
			`.sect .bss`
			`.sect .text`
* empty log message * 1985-01-08 11:48:43 +00:00
			`cmu4:`
			`popl saveret, *RR14`
			`popl RR0, *RR14`
			`popl RR2, *RR14`
			`cpl RR2, RR0`
			`ldk R0, $0`
			`ldl RR2, saveret`
			`jr ULT, 1f`
			`jp EQ, *RR2`
			`inc R0`
			`jp *RR2`
			`1: dec R0`
			`jp *RR2`