--- a/LargeInteger.st	Thu Jun 15 13:57:20 2017 +0200
+++ b/LargeInteger.st	Thu Jun 15 13:57:31 2017 +0200
@@ -315,7 +315,13 @@
     "Modified: / 8.5.1998 / 21:40:41 / cg"
 ! !
 
-
+!LargeInteger class methodsFor:'coercing & converting'!
+
+coerce:aNumber
+    "convert the argument aNumber into an instance of the receiver's class and return it."
+
+    ^ aNumber asLargeInteger
+! !
 
 !LargeInteger class methodsFor:'queries'!