From: ceriel <none@none>
Date: Thu, 13 Aug 1987 11:09:24 +0000 (+0000)
Subject: added cmi4.s
X-Git-Tag: release-5-5~3900
X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=e571911b1b78650588debb0eb40c1e026f0b0e84;p=ack.git

added cmi4.s
---

diff --git a/mach/i86/libem/LIST b/mach/i86/libem/LIST
index d675edcfc..beda76bd6 100644
--- a/mach/i86/libem/LIST
+++ b/mach/i86/libem/LIST
@@ -3,6 +3,7 @@ adi.s
 and.s
 cii.s
 cms.s
+cmi4.s
 cmu4.s
 com.s
 csa2.s
diff --git a/mach/i86/libem/cmi4.s b/mach/i86/libem/cmi4.s
new file mode 100644
index 000000000..d7e8b2d50
--- /dev/null
+++ b/mach/i86/libem/cmi4.s
@@ -0,0 +1,28 @@
+.sect .text; .sect .rom; .sect .data; .sect .bss
+.define .cmi4
+
+.sect .text
+.cmi4:
+	pop     bx              ! return address
+	pop     cx
+	pop     dx
+	pop     ax
+	push	si
+	mov	si,sp
+	xchg	bx,2(si)
+	pop	si
+	cmp     bx,dx
+	jg      1f
+	jl      2f
+	cmp     ax,cx
+	ja      1f
+	je      3f
+2:
+	mov	ax,-1
+	ret
+3:
+	xor	ax,ax
+	ret
+1:
+	mov	ax,1
+	ret