#DOCUMENTATION
authorClaus Gittinger <cg@exept.de>
Tue, 27 Oct 2015 16:10:26 +0100
changeset 18839 aa7721c46f4e
parent 18838 20220bfa6867
child 18840 1aaad31ce49d
#DOCUMENTATION class: Fraction comment/format in: #coerce:
Fraction.st
--- a/Fraction.st	Tue Oct 27 16:10:19 2015 +0100
+++ b/Fraction.st	Tue Oct 27 16:10:26 2015 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
@@ -11,6 +13,8 @@
 "
 "{ Package: 'stx:libbasic' }"
 
+"{ NameSpace: Smalltalk }"
+
 Number subclass:#Fraction
 	instanceVariableNames:'numerator denominator'
 	classVariableNames:'FractionOne FractionZero PrintWholeNumbers'
@@ -634,7 +638,7 @@
 !
 
 coerce:aNumber
-    "convert the argument aNumber into an instance of the receivers class and return it."
+    "convert the argument aNumber into an instance of the receiver's class and return it."
 
     ^ aNumber asFraction
 !
@@ -1191,11 +1195,11 @@
 !Fraction class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Fraction.st,v 1.86 2015-04-20 10:48:54 cg Exp $'
+    ^ '$Header$'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/Fraction.st,v 1.86 2015-04-20 10:48:54 cg Exp $'
+    ^ '$Header$'
 ! !