--- a/Float.st	Mon Apr 16 23:57:50 2012 +0200
+++ b/Float.st	Tue Apr 17 00:12:06 2012 +0200
@@ -587,6 +587,8 @@
 
 %{
 #ifdef __BORLANDC__
+    unsigned int _control87();
+
     int result = _control87(0, 0);
     RETURN(__MKSMALLINT(result));
 #endif
@@ -2773,11 +2775,11 @@
 !Float class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Float.st,v 1.177 2012-04-16 21:57:50 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Float.st,v 1.178 2012-04-16 22:12:06 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/Float.st,v 1.177 2012-04-16 21:57:50 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Float.st,v 1.178 2012-04-16 22:12:06 stefan Exp $'
 ! !
 
 Float initialize!