Fraction.st
changeset 11722 d32d16dd6384
parent 11671 6901343001b6
child 11734 7c2cc71aabc9
--- a/Fraction.st	Tue May 26 08:30:52 2009 +0200
+++ b/Fraction.st	Tue May 26 08:30:58 2009 +0200
@@ -567,7 +567,7 @@
 !
 
 coerce:aNumber
-    "return aNumber converted into receivers type"
+    "convert the argument aNumber into an instance of the receivers class and return it."
 
     ^ aNumber asFraction
 !
@@ -1123,7 +1123,7 @@
 !Fraction class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Fraction.st,v 1.76 2009-05-01 17:19:55 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Fraction.st,v 1.77 2009-05-26 06:30:58 cg Exp $'
 ! !
 
 Fraction initialize!