RegressionTests__IntegerTest.st
changeset 1323 a15b1d326f23
parent 1322 6925e7f2eaf3
child 1365 c3b631cb0688
equal deleted inserted replaced
1322:6925e7f2eaf3 1323:a15b1d326f23
       
     1 "{ Encoding: utf8 }"
       
     2 
     1 "{ Package: 'exept:regression' }"
     3 "{ Package: 'exept:regression' }"
     2 
     4 
     3 "{ NameSpace: RegressionTests }"
     5 "{ NameSpace: RegressionTests }"
     4 
     6 
     5 TestCase subclass:#IntegerTest
     7 TestCase subclass:#IntegerTest
  2219     self assert:( 16rFFFFFF7FFF signExtendedShortValue ) = 16r7FFF.   
  2221     self assert:( 16rFFFFFF7FFF signExtendedShortValue ) = 16r7FFF.   
  2220     self assert:( 16rFFFFFFFFFFFF signExtendedShortValue ) = -1.   
  2222     self assert:( 16rFFFFFFFFFFFF signExtendedShortValue ) = -1.   
  2221     self assert:( 16rFFFFFFFF7FFF signExtendedShortValue ) = 16r7FFF.   
  2223     self assert:( 16rFFFFFFFF7FFF signExtendedShortValue ) = 16r7FFF.   
  2222 
  2224 
  2223     self assert:( 16rFFFFFFFF signExtendedLongValue ) = -1.   
  2225     self assert:( 16rFFFFFFFF signExtendedLongValue ) = -1.   
  2224     self assert:( 16r7FFFFFFF signExtendedLongValue ) = 16r7FFFFFFF.   
  2226     self assert:( 16r7FFFFFFF signExtendedLongValue ) = 2147483647.   
       
  2227     self assert:( 16r80000000 signExtendedLongValue ) = -2147483648.   
  2225     self assert:( 16rFFFFFFFFFFFF signExtendedLongValue ) = -1.   
  2228     self assert:( 16rFFFFFFFFFFFF signExtendedLongValue ) = -1.   
  2226     self assert:( 16rFFFF7FFFFFFF signExtendedLongValue ) = 16r7FFFFFFF.   
  2229     self assert:( 16rFFFF7FFFFFFF signExtendedLongValue ) = 2147483647.   
       
  2230     self assert:( 16rFFFF80000000 signExtendedLongValue ) = -2147483648.   
  2227     self assert:( 16rFFFFFFFFFFFFFFFF signExtendedLongValue ) = -1.   
  2231     self assert:( 16rFFFFFFFFFFFFFFFF signExtendedLongValue ) = -1.   
  2228     self assert:( 16rFFFFFFFF7FFFFFFF signExtendedLongValue ) = 16r7FFFFFFF.   
  2232     self assert:( 16rFFFFFFFF7FFFFFFF signExtendedLongValue ) = 2147483647.   
       
  2233     self assert:( 16rFFFFFFFF80000000 signExtendedLongValue ) = -2147483648.   
  2229 
  2234 
  2230     self assert:( 16rFFFFFFFFFFFFFFFF signExtendedLongLongValue ) = -1.   
  2235     self assert:( 16rFFFFFFFFFFFFFFFF signExtendedLongLongValue ) = -1.   
  2231     self assert:( 16r7FFFFFFFFFFFFFFF signExtendedLongLongValue ) = 16r7FFFFFFFFFFFFFFF.   
  2236     self assert:( 16r7FFFFFFFFFFFFFFF signExtendedLongLongValue ) = 16r7FFFFFFFFFFFFFFF.   
  2232     self assert:( 16rFFFFFFFFFFFFFFFFFFFF signExtendedLongLongValue ) = -1.   
  2237     self assert:( 16rFFFFFFFFFFFFFFFFFFFF signExtendedLongLongValue ) = -1.   
  2233     self assert:( 16rFFFF7FFFFFFFFFFFFFFF signExtendedLongLongValue ) = 16r7FFFFFFFFFFFFFFF.   
  2238     self assert:( 16rFFFF7FFFFFFFFFFFFFFF signExtendedLongLongValue ) = 16r7FFFFFFFFFFFFFFF.