ack/mach/i86/libem/cmu4.s

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

.sect .text
.cmu4:
	pop     bx              ! return address
	pop     cx
	pop     dx
	pop     ax
	push	si
	mov	si,sp
	xchg	bx,2(si)
	pop	si
	cmp     bx,dx
	ja      1f
	jb      2f
	cmp     ax,cx
	ja      1f
	je      3f
2:
	mov	ax,-1
	ret
3:
	xor	ax,ax
	ret
1:
	mov	ax,1
	ret
adapted to new assembler syntax 1987-01-08 10:13:48 +00:00			`.sect .text; .sect .rom; .sect .data; .sect .bss`
* empty log message * 1985-02-07 15:33:13 +00:00			`.define .cmu4`

adapted to new assembler syntax 1987-01-08 10:13:48 +00:00			`.sect .text`
* empty log message * 1985-02-07 15:33:13 +00:00			`.cmu4:`
			`pop bx ! return address`
			`pop cx`
			`pop dx`
many changes because of introduction of register variables si/di 1987-06-09 10:22:50 +00:00			`pop ax`
			`push si`
			`mov si,sp`
			`xchg bx,2(si)`
			`pop si`
			`cmp bx,dx`
* empty log message * 1985-02-07 15:33:13 +00:00			`ja 1f`
			`jb 2f`
many changes because of introduction of register variables si/di 1987-06-09 10:22:50 +00:00			`cmp ax,cx`
* empty log message * 1985-02-07 15:33:13 +00:00			`ja 1f`
			`je 3f`
			`2:`
many changes because of introduction of register variables si/di 1987-06-09 10:22:50 +00:00			`mov ax,-1`
			`ret`
* empty log message * 1985-02-07 15:33:13 +00:00			`3:`
many changes because of introduction of register variables si/di 1987-06-09 10:22:50 +00:00			`xor ax,ax`
			`ret`
* empty log message * 1985-02-07 15:33:13 +00:00			`1:`
many changes because of introduction of register variables si/di 1987-06-09 10:22:50 +00:00			`mov ax,1`
* empty log message * 1985-02-07 15:33:13 +00:00			`ret`