RegressionTests__IntegerTest.st
changeset 1522 95ea02a9fcae
parent 1521 52ffd99b102b
child 1523 f8d51432b498
equal deleted inserted replaced
1521:52ffd99b102b 1522:95ea02a9fcae
  4068     self assert:((Integer readFrom:'FFFFFFFFFF' radix:16) hexPrintString = 'FFFFFFFFFF').
  4068     self assert:((Integer readFrom:'FFFFFFFFFF' radix:16) hexPrintString = 'FFFFFFFFFF').
  4069     self assert:((Integer readFrom:'FFFFFFFFFFF' radix:16) hexPrintString = 'FFFFFFFFFFF').
  4069     self assert:((Integer readFrom:'FFFFFFFFFFF' radix:16) hexPrintString = 'FFFFFFFFFFF').
  4070     self assert:((Integer readFrom:'FFFFFFFFFFFF' radix:16) hexPrintString = 'FFFFFFFFFFFF').
  4070     self assert:((Integer readFrom:'FFFFFFFFFFFF' radix:16) hexPrintString = 'FFFFFFFFFFFF').
  4071     self assert:((Integer readFrom:'FFFFFFFFFFFFF' radix:16) hexPrintString = 'FFFFFFFFFFFFF').
  4071     self assert:((Integer readFrom:'FFFFFFFFFFFFF' radix:16) hexPrintString = 'FFFFFFFFFFFFF').
  4072     self assert:((Integer readFrom:'FFFFFFFFFFFFFF' radix:16) hexPrintString = 'FFFFFFFFFFFFFF').
  4072     self assert:((Integer readFrom:'FFFFFFFFFFFFFF' radix:16) hexPrintString = 'FFFFFFFFFFFFFF').
       
  4073     self assert:((Integer readFrom:'FFFFFFFFFFFFFFF' radix:16) hexPrintString = 'FFFFFFFFFFFFFFF').
       
  4074     self assert:((Integer readFrom:'3FFFFFFFFFFFFFF' radix:16) hexPrintString = '3FFFFFFFFFFFFFF').
       
  4075     self assert:((Integer readFrom:'7FFFFFFFFFFFFFF' radix:16) hexPrintString = '7FFFFFFFFFFFFFF').
       
  4076     self assert:((Integer readFrom:'400000000000000' radix:16) hexPrintString = '400000000000000').
       
  4077     self assert:((Integer readFrom:'800000000000000' radix:16) hexPrintString = '800000000000000').
       
  4078 
       
  4079     self assert:((Integer readFrom:'-FFFFFFFF' radix:16) hexPrintString = '-FFFFFFFF').
       
  4080     self assert:((Integer readFrom:'-FFFFFFFFF' radix:16) hexPrintString = '-FFFFFFFFF').
       
  4081     self assert:((Integer readFrom:'-FFFFFFFFFF' radix:16) hexPrintString = '-FFFFFFFFFF').
       
  4082     self assert:((Integer readFrom:'-FFFFFFFFFFF' radix:16) hexPrintString = '-FFFFFFFFFFF').
       
  4083     self assert:((Integer readFrom:'-FFFFFFFFFFFF' radix:16) hexPrintString = '-FFFFFFFFFFFF').
       
  4084     self assert:((Integer readFrom:'-FFFFFFFFFFFFF' radix:16) hexPrintString = '-FFFFFFFFFFFFF').
       
  4085     self assert:((Integer readFrom:'-FFFFFFFFFFFFFF' radix:16) hexPrintString = '-FFFFFFFFFFFFFF').
       
  4086     self assert:((Integer readFrom:'-FFFFFFFFFFFFFFF' radix:16) hexPrintString = '-FFFFFFFFFFFFFFF').
       
  4087     self assert:((Integer readFrom:'-3FFFFFFFFFFFFFF' radix:16) hexPrintString = '-3FFFFFFFFFFFFFF').
       
  4088     self assert:((Integer readFrom:'-7FFFFFFFFFFFFFF' radix:16) hexPrintString = '-7FFFFFFFFFFFFFF').
       
  4089     self assert:((Integer readFrom:'-400000000000000' radix:16) hexPrintString = '-400000000000000').
       
  4090     self assert:((Integer readFrom:'-800000000000000' radix:16) hexPrintString = '-800000000000000').
  4073 
  4091 
  4074     self assert:((Integer readFrom:'10000000' radix:16) hexPrintString = '10000000').
  4092     self assert:((Integer readFrom:'10000000' radix:16) hexPrintString = '10000000').
  4075     self assert:((Integer readFrom:'100000000' radix:16) hexPrintString = '100000000').
  4093     self assert:((Integer readFrom:'100000000' radix:16) hexPrintString = '100000000').
  4076     self assert:((Integer readFrom:'1000000000' radix:16) hexPrintString = '1000000000').
  4094     self assert:((Integer readFrom:'1000000000' radix:16) hexPrintString = '1000000000').
  4077     self assert:((Integer readFrom:'10000000000' radix:16) hexPrintString = '10000000000').
  4095     self assert:((Integer readFrom:'10000000000' radix:16) hexPrintString = '10000000000').
  4078     self assert:((Integer readFrom:'100000000000' radix:16) hexPrintString = '100000000000').
  4096     self assert:((Integer readFrom:'100000000000' radix:16) hexPrintString = '100000000000').
  4079     self assert:((Integer readFrom:'1000000000000' radix:16) hexPrintString = '1000000000000').
  4097     self assert:((Integer readFrom:'1000000000000' radix:16) hexPrintString = '1000000000000').
  4080     self assert:((Integer readFrom:'10000000000000' radix:16) hexPrintString = '10000000000000').
  4098     self assert:((Integer readFrom:'10000000000000' radix:16) hexPrintString = '10000000000000').
       
  4099 
       
  4100     self assert:((Integer readFrom:'1152921504606846975' radix:10) hexPrintString = 'FFFFFFFFFFFFFFF').
       
  4101     self assert:((Integer readFrom:'288230376151711743' radix:10) hexPrintString = '3FFFFFFFFFFFFFF').
       
  4102     self assert:((Integer readFrom:'576460752303423487' radix:10) hexPrintString = '7FFFFFFFFFFFFFF').
       
  4103     self assert:((Integer readFrom:'288230376151711744' radix:10) hexPrintString = '400000000000000').
       
  4104     self assert:((Integer readFrom:'576460752303423488' radix:10) hexPrintString = '800000000000000').
  4081 
  4105 
  4082     t := Integer readFrom:'FFFFFFFF' radix:16.
  4106     t := Integer readFrom:'FFFFFFFF' radix:16.
  4083     self assert:((t + 1) hexPrintString = '100000000').
  4107     self assert:((t + 1) hexPrintString = '100000000').
  4084     t := Integer readFrom:'FFFFFFFFF' radix:16.
  4108     t := Integer readFrom:'FFFFFFFFF' radix:16.
  4085     self assert:((t + 1) hexPrintString = '1000000000').
  4109     self assert:((t + 1) hexPrintString = '1000000000').