From: Ulrich Drepper <drepper@redhat.com>
Date: Tue, 7 Jan 2003 17:48:42 +0000 (+0000)
Subject: (significand_test): New function. (main): Call it.
X-Git-Tag: cvs/glibc-2_3_2~345
X-Git-Url: http://git.ipfire.org/gitweb.cgi?a=commitdiff_plain;h=f5c8f28593f7421e653dbf52731f6d62babd6c48;p=thirdparty%2Fglibc.git

(significand_test): New function. (main): Call it.
---

diff --git a/math/libm-test.inc b/math/libm-test.inc
index f30a95e1875..783e4cc8544 100644
--- a/math/libm-test.inc
+++ b/math/libm-test.inc
@@ -1,4 +1,4 @@
-/* Copyright (C) 1997, 1998, 1999, 2000, 2001, 2002 Free Software Foundation, Inc.
+/* Copyright (C) 1997-2002, 2003 Free Software Foundation, Inc.
    This file is part of the GNU C Library.
    Contributed by Andreas Jaeger <aj@suse.de>, 1997.
 
@@ -4237,6 +4237,20 @@ yn_test (void)
 }
 
 
+static void
+significand_test (void)
+{
+  /* significand returns the mantissa of the exponential representation.  */
+  START (significand);
+
+  TEST_f_f (significand, 4.0, 1.0);
+  TEST_f_f (significand, 6.0, 1.5);
+  TEST_f_f (significand, 8.0, 1.0);
+
+  END (significand);
+}
+
+
 static void
 initialize (void)
 {
@@ -4432,6 +4446,7 @@ main (int argc, char **argv)
   scalb_test ();
   scalbn_test ();
   scalbln_test ();
+  significand_test ();
 
   /* Power and absolute value functions:  */
   cbrt_test ();