--- a/ShortFloat.st Sun Oct 19 23:24:47 2008 +0200
+++ b/ShortFloat.st Sun Oct 19 23:25:02 2008 +0200
@@ -9,9 +9,6 @@
other person. No title to or ownership of the software is
hereby transferred.
"
-
-
-
"{ Package: 'stx:libbasic' }"
LimitedPrecisionReal variableByteSubclass:#ShortFloat
@@ -702,7 +699,8 @@
!ShortFloat methodsFor:'coercing & converting'!
asFloat
- "return a Float with same value as the receiver"
+ "return a Float with same value as the receiver.
+ Redefined for performance (machine can do it faster)"
%{ /* NOCONTEXT */
@@ -1638,5 +1636,5 @@
!ShortFloat class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/ShortFloat.st,v 1.95 2006-09-14 19:26:56 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/ShortFloat.st,v 1.96 2008-10-19 21:25:02 cg Exp $'
! !