*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Fri, 12 Jan 2007 19:22:21 +0100
changeset 10315 4be6dacc89ce
parent 10314 4c1c549a5733
child 10316 b617a026a146
*** empty log message ***
ArithmeticValue.st
--- 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!