--- 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!