--- libm/fpmacros.c.mps	2005-04-19 17:26:13 +0200
+++ libm/fpmacros.c	2005-04-19 18:07:46 +0200
@@ -107,6 +107,10 @@
 		}
 }
 
+int __fpclassifyl ( long double arg )
+{
+	return (long double) __fpclassify( (double)arg );
+}
 
 /***********************************************************************
    int __isnormalf(float x) returns nonzero if and only if x is a
@@ -237,17 +241,15 @@
 }
 weak_alias (__isinf, isinf)
 
-#if 0
 int __isinfl ( long double x )
 {
-    int class = __fpclassify(x);
+    int class = __fpclassifyl(x);
     if ( class == FP_INFINITE ) {
 	return ( (__signbit(x)) ? -1 : 1);
     }
     return 0;
 }
 weak_alias (__isinfl, isinfl);
-#endif
 
 /***********************************************************************
    int __isnanf(float x) returns nonzero if and only if x is a
@@ -278,12 +280,10 @@
 }
 weak_alias (__isnan, isnan);
 
-#if 0
 int __isnanl ( long double x )
 {
-	int class = __fpclassify(x);
+	int class = __fpclassifyl(x);
 	return ( class == FP_NAN );
 }
 weak_alias (__isnanl, isnanl);
-#endif