1772     n1 := SmallInteger maxVal.

  1772     n1 := SmallInteger maxVal.

  1773     self assert:(n1 negated class == SmallInteger).

  1773     self assert:(n1 negated class == SmallInteger).

  1774     self assert:((n1 perform:'negated' asSymbol) class == SmallInteger).

  1774     self assert:((n1 perform:'negated' asSymbol) class == SmallInteger).

  1775 

  1775 

  1776     n1 := SmallInteger minVal.

  1776     n1 := SmallInteger minVal.

  1777 Transcript showCR:n1 negated class printString.

  1778 Transcript showCR:n1 negated class printString.

  1778     self assert:(n1 negated class == LargeInteger).

  1779     self assert:(n1 negated class == LargeInteger).

  1779     self assert:((n1 perform:'negated' asSymbol) class == LargeInteger).

  1780     self assert:((n1 perform:'negated' asSymbol) class == LargeInteger).

  1780 

  1781 

  1781     n1 := SmallInteger minVal negated - 1.

  1782     n1 := SmallInteger minVal negated - 1.