Mercurial Mercurial > hg > stx-libbasic / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
#REFACTORING by cg
authorClaus Gittinger <cg@exept.de>
Thu, 15 Jun 2017 13:56:41 +0200
changeset 21816 3db3da9b3702
parent 21815 e017f9904c30
child 21817 5d251e1af13a
#REFACTORING by cg class: ArithmeticValue changed: #coerce: default is to pass the work to the class side.
ArithmeticValue.st file | annotate | diff | comparison | revisions 
--- a/ArithmeticValue.st	Thu Jun 15 10:07:35 2017 +0200
+++ b/ArithmeticValue.st	Thu Jun 15 13:56:41 2017 +0200
@@ -479,7 +479,9 @@
 coerce:aNumber
     "convert the argument aNumber into an instance of the receiver's class and return it."
 
-    ^ self subclassResponsibility
+    ^ self class coerce:aNumber
+
+    "Modified: / 15-06-2017 / 10:27:03 / cg"
 !
 
 generality
hg/stx-libbasic