FixedPoint.st
changeset 2563 094145e2366f
parent 2538 6bbfd3558458
child 3060 0faf242e1142
--- a/FixedPoint.st	Fri Apr 18 16:39:43 1997 +0200
+++ b/FixedPoint.st	Fri Apr 18 16:40:09 1997 +0200
@@ -696,7 +696,7 @@
      For printout, only scale post-decimal digits are printed
      (and the printout is rounded to that many digits)"
 
-    |e decimals integerPart fractionPart negative num|
+    |e integerPart fractionPart negative num|
 
     numerator < 0 ifTrue:[
         negative := true.
@@ -858,5 +858,5 @@
 !FixedPoint class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/FixedPoint.st,v 1.7 1997-04-12 09:22:20 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/FixedPoint.st,v 1.8 1997-04-18 14:40:09 cg Exp $'
 ! !