From 8328c5aad8a58079915a020acf43737918fd69d8 Mon Sep 17 00:00:00 2001
From: charles forsyth <charles.forsyth@gmail.com>
Date: Wed, 5 Mar 2014 14:08:57 +0000
Subject: 20140305-1408

---
 lib9/setfcr-Linux-386.S | 34 ++++++++++++++++++++++++++++++++++
 1 file changed, 34 insertions(+)
 create mode 100644 lib9/setfcr-Linux-386.S

(limited to 'lib9')

diff --git a/lib9/setfcr-Linux-386.S b/lib9/setfcr-Linux-386.S
new file mode 100644
index 00000000..d981f36a
--- /dev/null
+++ b/lib9/setfcr-Linux-386.S
@@ -0,0 +1,34 @@
+
+#define	FN(x)	.type x,@function; .global x; x
+#define	ENT	subl $16, %esp
+#define	RET	addl $16, %esp; ret
+
+	.file	"setfcr-Linux-386.S"
+FN(setfcr):
+	ENT
+	xorb	$0x3f, %al
+	movl	%eax, (%esp)
+	fwait
+	fldcw	(%esp)
+	RET
+
+FN(getfcr):
+	ENT
+	fwait
+	fstcw	(%esp)
+	movw	(%esp), %ax
+	andl	$0xffff, %eax
+	xorb	$0x3f, %al
+	RET
+
+FN(getfsr):
+	ENT
+	fwait
+	fstsw	(%esp)
+	movw	(%esp), %ax
+	andl	$0xffff, %eax
+	RET
+
+FN(setfsr):
+	fclex
+	ret
-- 
cgit v1.2.3