# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 916431757 -3600
# Node ID ebf11ebe113e6388e45e8165ee658192513be63d
# Parent  20cc39f4e75c569f6c9144adaa9d376af28fb2a8
NAN for suseV6 nan.h

diff -r 20cc39f4e75c -r ebf11ebe113e Float.st
--- a/Float.st	Fri Jan 15 21:19:21 1999 +0100
+++ b/Float.st	Fri Jan 15 21:22:37 1999 +0100
@@ -423,7 +423,11 @@
 
 %{
 #if defined(LINUX) && defined(i386)
+# ifdef NAN
+    RETURN (__MKFLOAT(NAN));
+# else
     RETURN (__MKFLOAT(_SNAN));
+# endif
 #endif
 %}.
     ^ nil
@@ -1849,6 +1853,6 @@
 !Float class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Float.st,v 1.90 1998-12-16 17:56:05 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Float.st,v 1.91 1999-01-15 20:22:37 cg Exp $'
 ! !
 Float initialize!