--- a/ShortFloat.st	Tue Jun 17 16:51:20 2003 +0200
+++ b/ShortFloat.st	Tue Jun 17 18:06:32 2003 +0200
@@ -1039,66 +1039,6 @@
      * this may always ret false here ...
      */
     if (isnan(dV)) { RETURN (true); }
-
-# if 0 /* Currently all our systems support isnan()
-       * If not, you have to fix librun/jinterpret.c also.
-       */
-
-    /*
-     * sigh - every vendor is playing its own game here ...
-     * Q: what are standards worth, anyway ?
-     */
-#  ifdef IS_NAN
-    if (IS_NAN(dV)) { RETURN (true); }
-    RETURN (false);
-#  endif
-
-#  ifdef IS_QNAN
-    if (IS_QNAN(dV)) { RETURN (true); }
-    RETURN (false);
-#  endif
-
-#  ifdef FLT_SNAN
-    if (dV == FLT_SNAN) { RETURN (true); }
-    RETURN (false);
-#  endif
-
-#  ifdef FLT_QNAN
-    if (dV == FLT_QNAN) { RETURN (true); }
-    RETURN (false);
-#  endif
-
-#  ifdef _SNANF
-    if (dV == _SNAN) { RETURN (true); }
-    RETURN (false);
-#  endif
-
-#  ifdef _QNANF
-    if (dV == _QNAN) { RETURN (true); }
-    RETURN (false);
-#  endif
-
-#  ifdef IsPosNAN
-    if IsPosNAN(dV) { RETURN (true); }
-    RETURN (false);
-#  endif
-
-#  ifdef IsNegNAN
-    if IsNegNAN(dV) { RETURN (true); }
-    RETURN (false);
-#  endif
-
-#  ifdef NAN
-    if (dV == NAN) { RETURN (true); }
-    RETURN (false);
-#  endif
-
-#  ifdef NaN
-    if (NaN(dV)) { RETURN (true); }
-    RETURN (false);
-#  endif
-
-# endif /* 0 */
 #endif /* i386 */
 %}.
     ^ false
@@ -1483,5 +1423,5 @@
 !ShortFloat class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ShortFloat.st,v 1.76 2003-06-17 14:35:41 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ShortFloat.st,v 1.77 2003-06-17 16:06:32 cg Exp $'
 ! !