2011-02-02 Ralf Corsépius <ralf.corsepius@rtems.org>

	* math/math.scn, mathf/mathf.scn: Regenerate.
	* Makefile.am, configure.ac: Add mathf/.
	* math/init.c, math/Makefile.am: Reflect having split-out mathf.
	* math/domathf.c, math/domathl.c: Remove.
	* mathf/Makefile.am, mathf/domathf.c, mathf/init.c,
	mathf/mathf.scn: New (Split out from math/).

8 files changed, 19 insertions, 753 deletions

diff --git a/testsuites/libtests/ChangeLog b/testsuites/libtests/ChangeLog
index 29a6b4898b..51174b841f 100644
--- a/testsuites/libtests/ChangeLog
+++ b/testsuites/libtests/ChangeLog
@@ -1,5 +1,14 @@
 2011-02-02	Ralf Corsépius <ralf.corsepius@rtems.org>
 
+	* math/math.scn, mathf/mathf.scn: Regenerate.
+	* Makefile.am, configure.ac: Add mathf/.
+	* math/init.c, math/Makefile.am: Reflect having split-out mathf.
+	* math/domathf.c, math/domathl.c: Remove.
+	* mathf/Makefile.am, mathf/domathf.c, mathf/init.c,
+	mathf/mathf.scn: New (Split out from math/).
+
+2011-02-02	Ralf Corsépius <ralf.corsepius@rtems.org>
+
 	* math/init.c: 
 	Use fprintf(stdout,..) instead of printf.
 	Use CONFIGURE_APPLICATION_DISABLE_FILESYSTEM.
diff --git a/testsuites/libtests/Makefile.am b/testsuites/libtests/Makefile.am
index 739611c36e..8a575e02a5 100644
--- a/testsuites/libtests/Makefile.am
+++ b/testsuites/libtests/Makefile.am
@@ -10,7 +10,7 @@ SUBDIRS += bspcmdline01 cpuuse malloctest heapwalk putenvtest monitor \
     monitor02 rtmonuse stackchk stackchk01 termios termios01 termios02 \
     rtems++ tztest block01 block02 block03 block04 block05 block06 block07 \
     block08 block09 block10 stringto01
-SUBDIRS += math
+SUBDIRS += math mathf
 
 include $(top_srcdir)/../automake/subdirs.am
 include $(top_srcdir)/../automake/local.am
diff --git a/testsuites/libtests/configure.ac b/testsuites/libtests/configure.ac
index 8e07a21a64..c8ee83615c 100644
--- a/testsuites/libtests/configure.ac
+++ b/testsuites/libtests/configure.ac
@@ -61,5 +61,6 @@ termios02/Makefile
 tztest/Makefile
 POSIX/Makefile
 math/Makefile
+mathf/Makefile
 ])
 AC_OUTPUT
diff --git a/testsuites/libtests/math/Makefile.am b/testsuites/libtests/math/Makefile.am
index ebfbfc182f..27cf21a480 100644
--- a/testsuites/libtests/math/Makefile.am
+++ b/testsuites/libtests/math/Makefile.am
@@ -3,30 +3,14 @@
 ##
 
 rtems_tests_PROGRAMS = math
-math_SOURCES = init.c domath.c domathf.c domathl.c
-EXTRA_DIST = domath.in
+math_SOURCES = init.c domath.c
+EXTRA_DIST = $(srcdir)/../math/domath.in
 
-# FIXME: Skip long double, not yet supported in newlib
-math_CPPFLAGS = $(AM_CPPFLAGS) -DNO_LONG_DOUBLE
-
-domath.c: $(srcdir)/domath.in
+$(srcdir)/domath.c: $(srcdir)/../math/domath.in
 	sed -e 's,[@]FTYPE[@],double,' \
 	-e 's,[@]FSUFFIX[@], ,g' \
 	-e 's,[@]FGUARD[@],NO_DOUBLE,' \
-	$(srcdir)/domath.in > $(srcdir)/domath.c
-
-domathf.c: $(srcdir)/domath.in
-	sed -e 's,[@]FTYPE[@],float,' \
-	-e 's,[@]FSUFFIX[@],f,g' \
-	-e 's,[@]FGUARD[@],NO_FLOAT,' \
-	$(srcdir)/domath.in > $(srcdir)/domathf.c
-
-domathl.c: $(srcdir)/domath.in
-	sed -e 's,[@]FTYPE[@],long double,' \
-	-e 's,[@]FSUFFIX[@],l,g' \
-	-e 's,%f,%Lf,g' \
-	-e 's,[@]FGUARD[@],NO_LONG_DOUBLE,' \
-	$(srcdir)/domath.in > $(srcdir)/domathl.c
+	$(srcdir)/../math/domath.in > $(srcdir)/domath.c
 
 dist_rtems_tests_DATA = math.scn
 
diff --git a/testsuites/libtests/math/domathf.c b/testsuites/libtests/math/domathf.c
deleted file mode 100644
index 6d99ae1883..0000000000
--- a/testsuites/libtests/math/domathf.c
+++ /dev/null
@@ -1,281 +0,0 @@
-/*
- * Copyright (c) 2010 by
- * Ralf Corsepius, Ulm/Germany. All rights reserved.
- *
- * Permission to use, copy, modify, and distribute this software
- * is freely granted, provided that this notice is preserved.
- */
-
-/*
- * Try to compile and link against POSIX math routines.
- */
-
-#include <math.h>
-#include <stdio.h>
-
-#ifndef M_PI_2
-#define M_PI_2 1.57079632679489661923
-#endif
-
-#ifndef M_PI_4
-#define M_PI_4 0.78539816339744830962
-#endif
-
-void
-domathf (void)
-{
-#ifndef NO_FLOAT
-  float f1;
-  float f2;
-
-  int i1;
-
-  f1 = acosf(0.0);
-  fprintf( stdout, "acosf          : %f\n", f1);
-
-  f1 = acoshf(0.0);
-  fprintf( stdout, "acoshf         : %f\n", f1);
-
-  f1 = asinf(1.0);
-  fprintf( stdout, "asinf          : %f\n", f1);
-
-  f1 = asinhf(1.0);
-  fprintf( stdout, "asinhf         : %f\n", f1);
-
-  f1 = atanf(M_PI_4);
-  fprintf( stdout, "atanf          : %f\n", f1);
-
-  f1 = atan2f(2.3, 2.3);
-  fprintf( stdout, "atan2f         : %f\n", f1);
-
-  f1 = atanhf(1.0);
-  fprintf( stdout, "atanhf         : %f\n", f1);
-
-  f1 = cbrtf(27.0);
-  fprintf( stdout, "cbrtf          : %f\n", f1);
-
-  f1 = ceilf(3.5);
-  fprintf( stdout, "ceilf          : %f\n", f1);
-
-  f1 = copysignf(3.5, -2.5);
-  fprintf( stdout, "copysignf      : %f\n", f1);
-
-  f1 = cosf(M_PI_2);
-  fprintf( stdout, "cosf           : %f\n", f1);
-
-  f1 = coshf(M_PI_2);
-  fprintf( stdout, "coshf          : %f\n", f1);
-
-  f1 = erff(42.0);
-  fprintf( stdout, "erff           : %f\n", f1);
-
-  f1 = erfcf(42.0);
-  fprintf( stdout, "erfcf          : %f\n", f1);
-
-  f1 = expf(0.42);
-  fprintf( stdout, "expf           : %f\n", f1);
-
-  f1 = exp2f(0.42);
-  fprintf( stdout, "exp2f          : %f\n", f1);
-
-  f1 = expm1f(0.00042);
-  fprintf( stdout, "expm1f         : %f\n", f1);
-
-  f1 = fabsf(-1.123);
-  fprintf( stdout, "fabsf          : %f\n", f1);
-
-  f1 = fdimf(1.123, 2.123);
-  fprintf( stdout, "fdimf          : %f\n", f1);
-
-  f1 = floorf(0.5);
-  fprintf( stdout, "floorf         : %f\n", f1);
-  f1 = floorf(-0.5);
-  fprintf( stdout, "floorf         : %f\n", f1);
-
-  f1 = fmaf(2.1, 2.2, 3.01);
-  fprintf( stdout, "fmaf           : %f\n", f1);
-
-  f1 = fmaxf(-0.42, 0.42);
-  fprintf( stdout, "fmaxf          : %f\n", f1);
-
-  f1 = fminf(-0.42, 0.42);
-  fprintf( stdout, "fminf          : %f\n", f1);
-
-  f1 = fmodf(42.0, 3.0);
-  fprintf( stdout, "fmodf          : %f\n", f1);
-
-  /* no type-specific variant */
-  i1 = fpclassify(1.0);
-  fprintf( stdout, "fpclassify     : %d\n", i1);
-
-  f1 = frexpf(42.0, &i1);
-  fprintf( stdout, "frexpf         : %f\n", f1);
-
-  f1 = hypotf(42.0, 42.0);
-  fprintf( stdout, "hypotf         : %f\n", f1);
-
-  i1 = ilogbf(42.0);
-  fprintf( stdout, "ilogbf         : %d\n", i1);
-
-  /* no type-specific variant */
-  i1 = isfinite(3.0);
-  fprintf( stdout, "isfinite       : %d\n", i1);
-
-  /* no type-specific variant */
-  i1 = isgreater(3.0, 3.1);
-  fprintf( stdout, "isgreater      : %d\n", i1);
-
-  /* no type-specific variant */
-  i1 = isgreaterequal(3.0, 3.1);
-  fprintf( stdout, "isgreaterequal : %d\n", i1);
-
-  /* no type-specific variant */
-  i1 = isinf(3.0);
-  fprintf( stdout, "isinf          : %d\n", i1);
-
-  /* no type-specific variant */
-  i1 = isless(3.0, 3.1);
-  fprintf( stdout, "isless         : %d\n", i1);
-
-  /* no type-specific variant */
-  i1 = islessequal(3.0, 3.1);
-  fprintf( stdout, "islessequal    : %d\n", i1);
-
-  /* no type-specific variant */
-  i1 = islessgreater(3.0, 3.1);
-  fprintf( stdout, "islessgreater  : %d\n", i1);
-
-  /* no type-specific variant */
-  i1 = isnan(0.0);
-  fprintf( stdout, "isnan          : %d\n", i1);
-
-  /* no type-specific variant */
-  i1 = isnormal(3.0);
-  fprintf( stdout, "isnormal       : %d\n", i1);
-
-  /* no type-specific variant */
-  f1 = isunordered(1.0, 2.0);
-  fprintf( stdout, "isunordered    : %d\n", i1);
-
-  f1 = j0f(1.2);
-  fprintf( stdout, "j0f            : %f\n", f1);
-
-  f1 = j1f(1.2);
-  fprintf( stdout, "j1f            : %f\n", f1);
-
-  f1 = jnf(2,1.2);
-  fprintf( stdout, "jnf            : %f\n", f1);
-
-  f1 = ldexpf(1.2,3);
-  fprintf( stdout, "ldexpf         : %f\n", f1);
-
-  f1 = lgammaf(42.0);
-  fprintf( stdout, "lgammaf        : %f\n", f1);
-
-  f1 = llrintf(-0.5);
-  fprintf( stdout, "llrintf        : %f\n", f1);
-  f1 = llrintf(0.5);
-  fprintf( stdout, "llrintf        : %f\n", f1);
-
-  f1 = llroundf(-0.5);
-  fprintf( stdout, "lroundf        : %f\n", f1);
-  f1 = llroundf(0.5);
-  fprintf( stdout, "lroundf        : %f\n", f1);
-
-  f1 = logf(42.0);
-  fprintf( stdout, "logf           : %f\n", f1);
-
-  f1 = log10f(42.0);
-  fprintf( stdout, "log10f         : %f\n", f1);
-
-  f1 = log1pf(42.0);
-  fprintf( stdout, "log1pf         : %f\n", f1);
-
-  f1 = log2f(42.0);
-  fprintf( stdout, "log2f          : %f\n", f1);
-
-  f1 = logbf(42.0);
-  fprintf( stdout, "logbf          : %f\n", f1);
-
-  f1 = lrintf(-0.5);
-  fprintf( stdout, "lrintf         : %f\n", f1);
-  f1 = lrintf(0.5);
-  fprintf( stdout, "lrintf         : %f\n", f1);
-
-  f1 = lroundf(-0.5);
-  fprintf( stdout, "lroundf        : %f\n", f1);
-  f1 = lroundf(0.5);
-  fprintf( stdout, "lroundf        : %f\n", f1);
-
-  f1 = modff(42.0,&f2);
-  fprintf( stdout, "lmodff         : %f\n", f1);
-
-  f1 = nanf("");
-  fprintf( stdout, "nanf           : %f\n", f1);
-
-  f1 = nearbyintf(1.5);
-  fprintf( stdout, "nearbyintf     : %f\n", f1);
-
-  f1 = nextafterf(1.5,2.0);
-  fprintf( stdout, "nextafterf     : %f\n", f1);
-
-  f1 = powf(3.01, 2.0);
-  fprintf( stdout, "powf           : %f\n", f1);
-
-  f1 = remainderf(3.01,2.0);
-  fprintf( stdout, "remainderf     : %f\n", f1);
-
-  f1 = remquof(29.0,3.0,&i1);
-  fprintf( stdout, "remquof        : %f\n", f1);
-
-  f1 = rintf(0.5);
-  fprintf( stdout, "rintf          : %f\n", f1);
-  f1 = rintf(-0.5);
-  fprintf( stdout, "rintf          : %f\n", f1);
-
-  f1 = roundf(0.5);
-  fprintf( stdout, "roundf         : %f\n", f1);
-  f1 = roundf(-0.5);
-  fprintf( stdout, "roundf         : %f\n", f1);
-
-  f1 = scalblnf(1.2,3);
-  fprintf( stdout, "scalblnf       : %f\n", f1);
-
-  f1 = scalbnf(1.2,3);
-  fprintf( stdout, "scalbnf        : %f\n", f1);
-
-  /* no type-specific variant */
-  i1 = signbit(1.0);
-  fprintf( stdout, "signbit        : %i\n", i1);
-
-  f1 = sinf(M_PI_4);
-  fprintf( stdout, "sinf           : %f\n", f1);
-
-  f1 = sinhf(M_PI_4);
-  fprintf( stdout, "sinhf          : %f\n", f1);
-
-  f1 = sqrtf(9.0);
-  fprintf( stdout, "sqrtf          : %f\n", f1);
-
-  f1 = tanf(M_PI_4);
-  fprintf( stdout, "tanf           : %f\n", f1);
-
-  f1 = tanhf(M_PI_4);
-  fprintf( stdout, "tanhf          : %f\n", f1);
-
-  f1 = tgammaf(2.1);
-  fprintf( stdout, "tgammaf        : %f\n", f1);
-
-  f1 = truncf(3.5);
-  fprintf( stdout, "truncf         : %f\n", f1);
-
-  f1 = y0f(1.2);
-  fprintf( stdout, "y0f            : %f\n", f1);
-
-  f1 = y1f(1.2);
-  fprintf( stdout, "y1f            : %f\n", f1);
-
-  f1 = ynf(3,1.2);
-  fprintf( stdout, "ynf            : %f\n", f1);
-#endif
-}
diff --git a/testsuites/libtests/math/domathl.c b/testsuites/libtests/math/domathl.c
deleted file mode 100644
index 06a73809ad..0000000000
--- a/testsuites/libtests/math/domathl.c
+++ /dev/null
@@ -1,281 +0,0 @@
-/*
- * Copyright (c) 2010 by
- * Ralf Corsepius, Ulm/Germany. All rights reserved.
- *
- * Permission to use, copy, modify, and distribute this software
- * is freely granted, provided that this notice is preserved.
- */
-
-/*
- * Try to compile and link against POSIX math routines.
- */
-
-#include <math.h>
-#include <stdio.h>
-
-#ifndef M_PI_2
-#define M_PI_2 1.57079632679489661923
-#endif
-
-#ifndef M_PI_4
-#define M_PI_4 0.78539816339744830962
-#endif
-
-void
-domathl (void)
-{
-#ifndef NO_LONG_DOUBLE
-  long double f1;
-  long double f2;
-
-  int i1;
-
-  f1 = acosl(0.0);
-  fprintf( stdout, "acosl          : %Lf\n", f1);
-
-  f1 = acoshl(0.0);
-  fprintf( stdout, "acoshl         : %Lf\n", f1);
-
-  f1 = asinl(1.0);
-  fprintf( stdout, "asinl          : %Lf\n", f1);
-
-  f1 = asinhl(1.0);
-  fprintf( stdout, "asinhl         : %Lf\n", f1);
-
-  f1 = atanl(M_PI_4);
-  fprintf( stdout, "atanl          : %Lf\n", f1);
-
-  f1 = atan2l(2.3, 2.3);
-  fprintf( stdout, "atan2l         : %Lf\n", f1);
-
-  f1 = atanhl(1.0);
-  fprintf( stdout, "atanhl         : %Lf\n", f1);
-
-  f1 = cbrtl(27.0);
-  fprintf( stdout, "cbrtl          : %Lf\n", f1);
-
-  f1 = ceill(3.5);
-  fprintf( stdout, "ceill          : %Lf\n", f1);
-
-  f1 = copysignl(3.5, -2.5);
-  fprintf( stdout, "copysignl      : %Lf\n", f1);
-
-  f1 = cosl(M_PI_2);
-  fprintf( stdout, "cosl           : %Lf\n", f1);
-
-  f1 = coshl(M_PI_2);
-  fprintf( stdout, "coshl          : %Lf\n", f1);
-
-  f1 = erfl(42.0);
-  fprintf( stdout, "erfl           : %Lf\n", f1);
-
-  f1 = erfcl(42.0);
-  fprintf( stdout, "erfcl          : %Lf\n", f1);
-
-  f1 = expl(0.42);
-  fprintf( stdout, "expl           : %Lf\n", f1);
-
-  f1 = exp2l(0.42);
-  fprintf( stdout, "exp2l          : %Lf\n", f1);
-
-  f1 = expm1l(0.00042);
-  fprintf( stdout, "expm1l         : %Lf\n", f1);
-
-  f1 = fabsl(-1.123);
-  fprintf( stdout, "fabsl          : %Lf\n", f1);
-
-  f1 = fdiml(1.123, 2.123);
-  fprintf( stdout, "fdiml          : %Lf\n", f1);
-
-  f1 = floorl(0.5);
-  fprintf( stdout, "floorl         : %Lf\n", f1);
-  f1 = floorl(-0.5);
-  fprintf( stdout, "floorl         : %Lf\n", f1);
-
-  f1 = fmal(2.1, 2.2, 3.01);
-  fprintf( stdout, "fmal           : %Lf\n", f1);
-
-  f1 = fmaxl(-0.42, 0.42);
-  fprintf( stdout, "fmaxl          : %Lf\n", f1);
-
-  f1 = fminl(-0.42, 0.42);
-  fprintf( stdout, "fminl          : %Lf\n", f1);
-
-  f1 = fmodl(42.0, 3.0);
-  fprintf( stdout, "fmodl          : %Lf\n", f1);
-
-  /* no type-specific variant */
-  i1 = fpclassify(1.0);
-  fprintf( stdout, "fpclassify     : %d\n", i1);
-
-  f1 = frexpl(42.0, &i1);
-  fprintf( stdout, "frexpl         : %Lf\n", f1);
-
-  f1 = hypotl(42.0, 42.0);
-  fprintf( stdout, "hypotl         : %Lf\n", f1);
-
-  i1 = ilogbl(42.0);
-  fprintf( stdout, "ilogbl         : %d\n", i1);
-
-  /* no type-specific variant */
-  i1 = isfinite(3.0);
-  fprintf( stdout, "isfinite       : %d\n", i1);
-
-  /* no type-specific variant */
-  i1 = isgreater(3.0, 3.1);
-  fprintf( stdout, "isgreater      : %d\n", i1);
-
-  /* no type-specific variant */
-  i1 = isgreaterequal(3.0, 3.1);
-  fprintf( stdout, "isgreaterequal : %d\n", i1);
-
-  /* no type-specific variant */
-  i1 = isinf(3.0);
-  fprintf( stdout, "isinf          : %d\n", i1);
-
-  /* no type-specific variant */
-  i1 = isless(3.0, 3.1);
-  fprintf( stdout, "isless         : %d\n", i1);
-
-  /* no type-specific variant */
-  i1 = islessequal(3.0, 3.1);
-  fprintf( stdout, "islessequal    : %d\n", i1);
-
-  /* no type-specific variant */
-  i1 = islessgreater(3.0, 3.1);
-  fprintf( stdout, "islessgreater  : %d\n", i1);
-
-  /* no type-specific variant */
-  i1 = isnan(0.0);
-  fprintf( stdout, "isnan          : %d\n", i1);
-
-  /* no type-specific variant */
-  i1 = isnormal(3.0);
-  fprintf( stdout, "isnormal       : %d\n", i1);
-
-  /* no type-specific variant */
-  f1 = isunordered(1.0, 2.0);
-  fprintf( stdout, "isunordered    : %d\n", i1);
-
-  f1 = j0l(1.2);
-  fprintf( stdout, "j0l            : %Lf\n", f1);
-
-  f1 = j1l(1.2);
-  fprintf( stdout, "j1l            : %Lf\n", f1);
-
-  f1 = jnl(2,1.2);
-  fprintf( stdout, "jnl            : %Lf\n", f1);
-
-  f1 = ldexpl(1.2,3);
-  fprintf( stdout, "ldexpl         : %Lf\n", f1);
-
-  f1 = lgammal(42.0);
-  fprintf( stdout, "lgammal        : %Lf\n", f1);
-
-  f1 = llrintl(-0.5);
-  fprintf( stdout, "llrintl        : %Lf\n", f1);
-  f1 = llrintl(0.5);
-  fprintf( stdout, "llrintl        : %Lf\n", f1);
-
-  f1 = llroundl(-0.5);
-  fprintf( stdout, "lroundl        : %Lf\n", f1);
-  f1 = llroundl(0.5);
-  fprintf( stdout, "lroundl        : %Lf\n", f1);
-
-  f1 = logl(42.0);
-  fprintf( stdout, "logl           : %Lf\n", f1);
-
-  f1 = log10l(42.0);
-  fprintf( stdout, "log10l         : %Lf\n", f1);
-
-  f1 = log1pl(42.0);
-  fprintf( stdout, "log1pl         : %Lf\n", f1);
-
-  f1 = log2l(42.0);
-  fprintf( stdout, "log2l          : %Lf\n", f1);
-
-  f1 = logbl(42.0);
-  fprintf( stdout, "logbl          : %Lf\n", f1);
-
-  f1 = lrintl(-0.5);
-  fprintf( stdout, "lrintl         : %Lf\n", f1);
-  f1 = lrintl(0.5);
-  fprintf( stdout, "lrintl         : %Lf\n", f1);
-
-  f1 = lroundl(-0.5);
-  fprintf( stdout, "lroundl        : %Lf\n", f1);
-  f1 = lroundl(0.5);
-  fprintf( stdout, "lroundl        : %Lf\n", f1);
-
-  f1 = modfl(42.0,&f2);
-  fprintf( stdout, "lmodfl         : %Lf\n", f1);
-
-  f1 = nanl("");
-  fprintf( stdout, "nanl           : %Lf\n", f1);
-
-  f1 = nearbyintl(1.5);
-  fprintf( stdout, "nearbyintl     : %Lf\n", f1);
-
-  f1 = nextafterl(1.5,2.0);
-  fprintf( stdout, "nextafterl     : %Lf\n", f1);
-
-  f1 = powl(3.01, 2.0);
-  fprintf( stdout, "powl           : %Lf\n", f1);
-
-  f1 = remainderl(3.01,2.0);
-  fprintf( stdout, "remainderl     : %Lf\n", f1);
-
-  f1 = remquol(29.0,3.0,&i1);
-  fprintf( stdout, "remquol        : %Lf\n", f1);
-
-  f1 = rintl(0.5);
-  fprintf( stdout, "rintl          : %Lf\n", f1);
-  f1 = rintl(-0.5);
-  fprintf( stdout, "rintl          : %Lf\n", f1);
-
-  f1 = roundl(0.5);
-  fprintf( stdout, "roundl         : %Lf\n", f1);
-  f1 = roundl(-0.5);
-  fprintf( stdout, "roundl         : %Lf\n", f1);
-
-  f1 = scalblnl(1.2,3);
-  fprintf( stdout, "scalblnl       : %Lf\n", f1);
-
-  f1 = scalbnl(1.2,3);
-  fprintf( stdout, "scalbnl        : %Lf\n", f1);
-
-  /* no type-specific variant */
-  i1 = signbit(1.0);
-  fprintf( stdout, "signbit        : %i\n", i1);
-
-  f1 = sinl(M_PI_4);
-  fprintf( stdout, "sinl           : %Lf\n", f1);
-
-  f1 = sinhl(M_PI_4);
-  fprintf( stdout, "sinhl          : %Lf\n", f1);
-
-  f1 = sqrtl(9.0);
-  fprintf( stdout, "sqrtl          : %Lf\n", f1);
-
-  f1 = tanl(M_PI_4);
-  fprintf( stdout, "tanl           : %Lf\n", f1);
-
-  f1 = tanhl(M_PI_4);
-  fprintf( stdout, "tanhl          : %Lf\n", f1);
-
-  f1 = tgammal(2.1);
-  fprintf( stdout, "tgammal        : %Lf\n", f1);
-
-  f1 = truncl(3.5);
-  fprintf( stdout, "truncl         : %Lf\n", f1);
-
-  f1 = y0l(1.2);
-  fprintf( stdout, "y0l            : %Lf\n", f1);
-
-  f1 = y1l(1.2);
-  fprintf( stdout, "y1l            : %Lf\n", f1);
-
-  f1 = ynl(3,1.2);
-  fprintf( stdout, "ynl            : %Lf\n", f1);
-#endif
-}
diff --git a/testsuites/libtests/math/init.c b/testsuites/libtests/math/init.c
index 319efd0439..60966af61c 100644
--- a/testsuites/libtests/math/init.c
+++ b/testsuites/libtests/math/init.c
@@ -28,8 +28,6 @@
 #include <stdlib.h>
 
 extern void domath(void);
-extern void domathf(void);
-extern void domathl(void);
 
 #if __rtems__
 rtems_task Init(
@@ -39,13 +37,11 @@ rtems_task Init(
 int main( void )
 #endif
 {
-  fprintf( stdout, "*** FLOAT MATH TEST ***\n" );
+  fprintf( stdout, "*** DOUBLE MATH TEST ***\n" );
 
   domath();
-  domathf();  
-  domathl();
 
-  fprintf( stdout, "*** END OF FLOAT MATH TEST ***\n" );
+  fprintf( stdout, "*** END OF DOUBLE MATH TEST ***\n" );
   exit( 0 );
 }
 
diff --git a/testsuites/libtests/math/math.scn b/testsuites/libtests/math/math.scn
index 71fd807783..ca2688eff5 100644
--- a/testsuites/libtests/math/math.scn
+++ b/testsuites/libtests/math/math.scn
@@ -1,4 +1,4 @@
-*** FLOAT MATH TEST ***
+*** DOUBLE MATH TEST ***
 acos           : 1.570796
 acosh          : -nan
 asin           : 1.570796
@@ -80,166 +80,4 @@ trunc          : 3.000000
 y0             : 0.228084
 y1             : -0.621136
 yn             : -3.589900
-acosf          : 1.570796
-acoshf         : -nan
-asinf          : 1.570796
-asinhf         : 0.881374
-atanf          : 0.665774
-atan2f         : 0.785398
-atanhf         : inf
-cbrtf          : 3.000000
-ceilf          : 4.000000
-copysignf      : -3.500000
-cosf           : -0.000000
-coshf          : 2.509179
-erff           : 1.000000
-erfcf          : 0.000000
-expf           : 1.521962
-exp2f          : 1.337928
-expm1f         : 0.000420
-fabsf          : 1.123000
-fdimf          : 0.000000
-floorf         : 0.000000
-floorf         : -1.000000
-fmaf           : 7.630000
-fmaxf          : 0.420000
-fminf          : -0.420000
-fmodf          : 0.000000
-fpclassify     : 4
-frexpf         : 0.656250
-hypotf         : 59.396969
-ilogbf         : 5
-isfinite       : 1
-isgreater      : 0
-isgreaterequal : 0
-isinf          : 0
-isless         : 1
-islessequal    : 1
-islessgreater  : 1
-isnan          : 0
-isnormal       : 1
-isunordered    : 1
-j0f            : 0.671133
-j1f            : 0.498289
-jnf            : 0.159349
-ldexpf         : 9.600000
-lgammaf        : 114.034218
-llrintf        : 0.000000
-llrintf        : 0.000000
-lroundf        : -1.000000
-lroundf        : 1.000000
-logf           : 3.737670
-log10f         : 1.623249
-log1pf         : 3.761200
-log2f          : 5.392317
-logbf          : 5.000000
-lrintf         : 0.000000
-lrintf         : 0.000000
-lroundf        : -1.000000
-lroundf        : 1.000000
-lmodff         : 0.000000
-nanf           : nan
-nearbyintf     : 2.000000
-nextafterf     : 1.500000
-powf           : 9.060100
-remainderf     : -0.990000
-remquof        : -1.000000
-rintf          : 0.000000
-rintf          : -0.000000
-roundf         : 1.000000
-roundf         : -1.000000
-scalblnf       : 9.600000
-scalbnf        : 9.600000
-signbit        : 0
-sinf           : 0.707107
-sinhf          : 0.868671
-sqrtf          : 3.000000
-tanf           : 1.000000
-tanhf          : 0.655794
-tgammaf        : 1.046486
-truncf         : 3.000000
-y0f            : 0.228084
-y1f            : -0.621136
-ynf            : -3.589899
-acosl          : 1.570796
-acoshl         : -nan
-asinl          : 1.570796
-asinhl         : 0.881374
-atanl          : 0.665774
-atan2l         : 0.785398
-atanhl         : inf
-cbrtl          : 3.000000
-ceill          : 4.000000
-copysignl      : -3.500000
-cosl           : 0.000000
-coshl          : 2.509178
-erfl           : 1.000000
-erfcl          : 0.000000
-expl           : 1.521962
-exp2l          : 1.337928
-expm1l         : 0.000420
-fabsl          : 1.123000
-fdiml          : 0.000000
-floorl         : 0.000000
-floorl         : -1.000000
-fmal           : 7.630000
-fmaxl          : 0.420000
-fminl          : -0.420000
-fmodl          : 0.000000
-fpclassify     : 4
-frexpl         : 0.656250
-hypotl         : 59.396970
-ilogbl         : 5
-isfinite       : 1
-isgreater      : 0
-isgreaterequal : 0
-isinf          : 0
-isless         : 1
-islessequal    : 1
-islessgreater  : 1
-isnan          : 0
-isnormal       : 1
-isunordered    : 1
-j0l            : 0.671133
-j1l            : 0.498289
-jnl            : 0.159349
-ldexpl         : 9.600000
-lgammal        : 114.034212
-llrintl        : 0.000000
-llrintl        : 0.000000
-lroundl        : -1.000000
-lroundl        : 1.000000
-logl           : 3.737670
-log10l         : 1.623249
-log1pl         : 3.761200
-log2l          : 5.392317
-logbl          : 5.000000
-lrintl         : 0.000000
-lrintl         : 0.000000
-lroundl        : -1.000000
-lroundl        : 1.000000
-lmodfl         : 0.000000
-nanl           : nan
-nearbyintl     : 2.000000
-nextafterl     : 1.500000
-powl           : 9.060100
-remainderl     : -0.990000
-remquol        : -1.000000
-rintl          : 0.000000
-rintl          : -0.000000
-roundl         : 1.000000
-roundl         : -1.000000
-scalblnl       : 9.600000
-scalbnl        : 9.600000
-signbit        : 0
-sinl           : 0.707107
-sinhl          : 0.868671
-sqrtl          : 3.000000
-tanl           : 1.000000
-tanhl          : 0.655794
-tgammal        : 1.046486
-truncl         : 3.000000
-y0l            : 0.228084
-y1l            : -0.621136
-ynl            : -3.589900
-*** END OF FLOAT MATH TEST ***
+*** END OF DOUBLE MATH TEST ***