author | sr |
Thu, 12 Oct 2017 15:50:06 +0200 | |
changeset 1826 | 7f594933e20e |
parent 1825 | 026061f8fc6a |
child 1827 | ede30a444a9f |
--- a/RegressionTests__IntegerTest.st Thu Oct 12 15:49:33 2017 +0200 +++ b/RegressionTests__IntegerTest.st Thu Oct 12 15:50:06 2017 +0200 @@ -1774,6 +1774,7 @@ self assert:((n1 perform:'negated' asSymbol) class == SmallInteger). n1 := SmallInteger minVal. +Transcript showCR:n1 negated class printString. self assert:(n1 negated class == LargeInteger). self assert:((n1 perform:'negated' asSymbol) class == LargeInteger).