Fraction.st
changeset 7403 857702a5a921
parent 7380 c704ff45bb80
child 7442 1b0a20747a64
--- a/Fraction.st	Tue Jun 17 16:08:21 2003 +0200
+++ b/Fraction.st	Tue Jun 17 16:11:23 2003 +0200
@@ -967,7 +967,6 @@
         ^ self
     ].
     ^ (numerator rem: denominator) / denominator
-    "/ ^ super fractionPart
 
     "
      (3/2) fractionPart + (3/2) truncated    
@@ -1048,7 +1047,7 @@
 !Fraction class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Fraction.st,v 1.64 2003-06-17 08:41:33 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Fraction.st,v 1.65 2003-06-17 14:09:33 cg Exp $'
 ! !
 
 Fraction initialize!