author | sr |
Thu, 12 Oct 2017 16:25:29 +0200 | |
changeset 1831 | 0d50d4ece031 |
parent 1830 | 9d353438de61 |
child 1832 | 672ae0ade75c |
--- a/RegressionTests__IntegerTest.st Thu Oct 12 16:16:39 2017 +0200 +++ b/RegressionTests__IntegerTest.st Thu Oct 12 16:25:29 2017 +0200 @@ -1774,6 +1774,7 @@ self assert:((n1 perform:'negated' asSymbol) class == SmallInteger). n1 := SmallInteger minVal. +Transcript showCR:n1 printString. Transcript showCR:n1 negated printString. Transcript showCR:n1 negated class printString. self assert:(n1 negated class == LargeInteger).