From b26f76ed3baacea3771521caa6069f338572635d Mon Sep 17 00:00:00 2001
From: ceriel <devnull@localhost>
Date: Tue, 16 May 1989 16:02:46 +0000
Subject: [PATCH] bug fixes

---
 mach/i86/libem/exg.s  | 4 +++-
 mach/i86/libem/iaar.s | 3 +--
 2 files changed, 4 insertions(+), 3 deletions(-)

diff --git a/mach/i86/libem/exg.s b/mach/i86/libem/exg.s
index 6360c8e3..35fa9311 100644
--- a/mach/i86/libem/exg.s
+++ b/mach/i86/libem/exg.s
@@ -5,7 +5,7 @@
 .sect .text
 .exg:
 	push	di
-	mov	sp,di
+	mov	di,sp
 	add	di,4
 	mov	bx,di
 	add	bx,cx
@@ -14,6 +14,8 @@
 	mov	ax,(bx)
 	xchg	ax,(di)
 	mov	(bx),ax
+	add	di,2
+	add	bx,2
 	loop	1b
 2:
 	pop	di
diff --git a/mach/i86/libem/iaar.s b/mach/i86/libem/iaar.s
index e55f4287..940e5298 100644
--- a/mach/i86/libem/iaar.s
+++ b/mach/i86/libem/iaar.s
@@ -10,10 +10,9 @@
 	jne     .unknown
 	pop     bx      ! descriptor address
 	pop     ax      ! index
-	pop     dx      ! array base
 	sub     ax,(bx)
 	mul     4(bx)
-	mov	bx,dx
+	pop	bx	! base address
 	add     bx,ax
 	push	cx
 	ret