author | Claus Gittinger <cg@exept.de> |
Wed, 10 Feb 2016 01:19:39 +0100 | |
changeset 19162 | dcefb6a62d18 |
parent 19161 | a7f0570d0c3a |
child 19163 | b45df3976f74 |
LargeInteger.st | file | annotate | diff | comparison | revisions |
--- a/LargeInteger.st Wed Feb 10 01:18:19 2016 +0100 +++ b/LargeInteger.st Wed Feb 10 01:19:39 2016 +0100 @@ -314,6 +314,8 @@ "Modified: / 8.5.1998 / 21:40:41 / cg" ! ! + + !LargeInteger class methodsFor:'queries'! isBuiltInClass @@ -2397,7 +2399,7 @@ num := anInteger abs. SmallInteger maxBytes == 8 ifTrue:[ - (num > 16rFFFFFFFF) ifTrue:[ + (num > 16rFFFFFFFFFF) ifTrue:[ "if num is too big (so that multiplying by a byte could create a Large)" ^ anInteger retry:#* coercing:self ].