--- a/ArithmeticValue.st Fri Jan 12 19:15:36 2007 +0100
+++ b/ArithmeticValue.st Fri Jan 12 19:22:21 2007 +0100
@@ -9,7 +9,6 @@
other person. No title to or ownership of the software is
hereby transferred.
"
-
"{ Package: 'stx:libbasic' }"
Magnitude subclass:#ArithmeticValue
@@ -511,10 +510,10 @@
asLongFloat
"return a longFloat with same value"
- "WARNING: could loose precision here, if not redefined in concrete classes which
- have more than float precision (i.e. LargeIntegers and Fractions)"
+ "WARNING: could loose precision here, if not redefined in concrete classes which
+ have more than float precision (i.e. LargeIntegers and Fractions)"
- ^ self asFloat asLongFloat "/ subclassResponsibility
+ ^ self asFloat asLongFloat "/ subclassResponsibility
"Modified: / 17.4.1996 / 12:21:35 / cg"
"Created: / 7.9.2001 / 13:39:31 / cg"
@@ -1292,7 +1291,7 @@
!ArithmeticValue class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/ArithmeticValue.st,v 1.73 2006-07-17 10:51:00 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/ArithmeticValue.st,v 1.74 2007-01-12 18:22:21 cg Exp $'
! !
ArithmeticValue initialize!