From 85023f4c1481529c5367dcf32de6849c76736772 Mon Sep 17 00:00:00 2001
From: ceriel <none@none>
Date: Tue, 9 Jun 1987 15:15:18 +0000
Subject: [PATCH] some fixes

---
 mach/i86/libem/LIST  |  1 +
 mach/i86/libem/blm.s | 15 +++++++++++++++
 mach/i86/libem/set.s |  2 +-
 3 files changed, 17 insertions(+), 1 deletion(-)
 create mode 100644 mach/i86/libem/blm.s

diff --git a/mach/i86/libem/LIST b/mach/i86/libem/LIST
index 1c9777b99..d675edcfc 100644
--- a/mach/i86/libem/LIST
+++ b/mach/i86/libem/LIST
@@ -54,3 +54,4 @@ ret8.s
 lfr6.s
 lfr8.s
 retarea.s
+blm.s
diff --git a/mach/i86/libem/blm.s b/mach/i86/libem/blm.s
new file mode 100644
index 000000000..c107e3199
--- /dev/null
+++ b/mach/i86/libem/blm.s
@@ -0,0 +1,15 @@
+.sect .text
+.define .blm
+
+	! cx: count in words
+.blm:
+	mov	bx,sp
+	mov	ax,si
+	mov	dx,di
+	mov	di,2(bx)
+	mov	si,4(bx)
+	rep	movs
+	mov	si,ax
+	mov	di,dx
+	ret	4
+
diff --git a/mach/i86/libem/set.s b/mach/i86/libem/set.s
index f8d5ddf2f..4bc683274 100644
--- a/mach/i86/libem/set.s
+++ b/mach/i86/libem/set.s
@@ -15,7 +15,7 @@
 	xor	di,di
 	sar	cx,1
 1:
-	mov     dx,4(bx)(di)
+	mov     4(bx)(di),dx
 	add	di,2
 	loop	1b
 !endif
-- 
2.34.1