From 1077fa4d772832f77a677ce7fb7c2d513b959e3f Mon Sep 17 00:00:00 2001
From: Eric Andersen <andersen@codepoet.org>
Date: Thu, 10 May 2001 00:40:28 +0000
Subject: uClibc now has a math library.  muahahahaha!  -Erik

---
 libm/double/fltest2.c | 18 ++++++++++++++++++
 1 file changed, 18 insertions(+)
 create mode 100644 libm/double/fltest2.c

(limited to 'libm/double/fltest2.c')

diff --git a/libm/double/fltest2.c b/libm/double/fltest2.c
new file mode 100644
index 000000000..405b81b6a
--- /dev/null
+++ b/libm/double/fltest2.c
@@ -0,0 +1,18 @@
+int drand();
+double exp(), frexp(), ldexp();
+volatile double x, y, z;
+
+main()
+{
+int i, e;
+
+for( i=0; i<100000; i++ )
+  {
+    drand(&x);
+    x = exp( 10.0*(x - 1.5) );
+    y = frexp( x, &e );
+    z = ldexp( y, e );
+    if( z != x )
+      abort();
+  }
+}
-- 
cgit v1.2.3