Float.st
changeset 7409 73bb437f0f92
parent 7405 9b0334a4591b
child 7410 ba285982489a
--- a/Float.st	Tue Jun 17 18:10:28 2003 +0200
+++ b/Float.st	Tue Jun 17 21:34:08 2003 +0200
@@ -1875,7 +1875,11 @@
 #endif
     {
         __threadErrno = 0;
+#ifdef WIN32
+        rslt = arcCosh(val);
+#else
         rslt = acosh(val);
+#endif
         if (! isnan(rslt))  /* Currently all our systems support isnan() */
         {
             if (__threadErrno == 0) {
@@ -2472,7 +2476,7 @@
 !Float class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Float.st,v 1.141 2003-06-17 14:35:09 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Float.st,v 1.142 2003-06-17 19:34:08 cg Exp $'
 ! !
 
 Float initialize!