removed unsued var
authorClaus Gittinger <cg@exept.de>
Fri, 18 Apr 1997 16:40:09 +0200
changeset 2563 094145e2366f
parent 2562 e89b40632edc
child 2564 0259b286c09a
removed unsued var
FixedPoint.st
--- 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 $'
 ! !