From: Julian Seward <jseward@acm.org>
Date: Fri, 25 Mar 2005 20:29:00 +0000 (+0000)
Subject: Very inadequate test program for fxam.
X-Git-Tag: svn/VALGRIND_3_0_1^2~252
X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=1f8b075f3ed7d0c4ca654e8640e7e850fd45fdc2;p=thirdparty%2Fvalgrind.git

Very inadequate test program for fxam.


git-svn-id: svn://svn.valgrind.org/vex/trunk@1082
---

diff --git a/VEX/test/x87fxam.c b/VEX/test/x87fxam.c
new file mode 100644
index 0000000000..0810c270fd
--- /dev/null
+++ b/VEX/test/x87fxam.c
@@ -0,0 +1,28 @@
+
+#include <stdio.h>
+#include <math.h>
+
+double d;
+int i;
+
+extern void do_tst ( void );
+
+asm(
+"\n"
+"do_tst:\n"
+"\txorl %eax,%eax\n"
+"\tfld d\n"
+"\tfxam\n"
+"\tfnstsw %ax\n"
+"\tffree %st(0)\n"
+"\tmovl %eax, i\n"
+"\tret\n"
+);
+
+int main ( void )
+{
+   d = -1.23; do_tst(); printf("%f -> 0x%x\n", d, i );
+   d = 0.0;   do_tst(); printf("%f -> 0x%x\n", d, i );
+   d = 9.87;  do_tst(); printf("%f -> 0x%x\n", d, i );
+   return 0;
+}