#FEATURE by exept
authorClaus Gittinger <cg@exept.de>
Sun, 01 Dec 2019 05:27:11 +0100
changeset 25014 a75b53bdb6c3
parent 25013 eb9cf7e9d6b5
child 25015 a2deebae940a
#FEATURE by exept class: MeasurementValue class added: #coerce:
MeasurementValue.st
--- a/MeasurementValue.st	Sun Dec 01 05:26:53 2019 +0100
+++ b/MeasurementValue.st	Sun Dec 01 05:27:11 2019 +0100
@@ -140,6 +140,14 @@
     "Modified (comment): / 01-07-2017 / 19:28:32 / cg"
 ! !
 
+!MeasurementValue class methodsFor:'coercing & converting'!
+
+coerce:aNumber
+    "convert the argument aNumber into an instance of the receiver's class and return it."
+
+    ^ MeasurementValue value:aNumber minValue:aNumber maxValue:aNumber
+! !
+
 !MeasurementValue class methodsFor:'constants'!
 
 unity