[Pkg] The Trunk: KernelTests-nice.298.mcz

commits at source.squeak.org commits at source.squeak.org
Sat Oct 31 17:49:58 UTC 2015


Nicolas Cellier uploaded a new version of KernelTests to project The Trunk:
http://source.squeak.org/trunk/KernelTests-nice.298.mcz

==================== Summary ====================

Name: KernelTests-nice.298
Author: nice
Time: 31 October 2015, 6:49:35.522 pm
UUID: bd6fa081-0481-4e5c-85d0-c1c8207c7f7f
Ancestors: KernelTests-eem.297

Revise the tests relative to SmallInteger range for 64bits spur VM compatibility.

=============== Diff against KernelTests-eem.297 ===============

Item was changed:
  ----- Method: SmallIntegerTest>>testMaxVal (in category 'testing - Class Methods') -----
  testMaxVal
  
+ 	self assert: (SmallInteger maxVal = 16r3FFFFFFF or: [SmallInteger maxVal = 16rFFFFFFFFFFFFFFF]).!
- 	self assert: (SmallInteger maxVal = 16r3FFFFFFF).!

Item was changed:
  ----- Method: SmallIntegerTest>>testMinVal (in category 'testing - Class Methods') -----
  testMinVal
  
+ 	self assert: (SmallInteger minVal = -16r40000000 or: [SmallInteger minVal = -16r1000000000000000]).!
- 	self assert: (SmallInteger minVal = -16r40000000).!

Item was changed:
  ----- Method: SmallIntegerTest>>testPrintString (in category 'testing - printing') -----
  testPrintString
  	self assert: 1 printString  = '1'.
  	self assert: -1 printString  = '-1'.
+ 	self assert: SmallInteger minVal printString  = (Smalltalk wordSize = 8 ifTrue: [ '-1152921504606846976'] ifFalse: ['-1073741824']).
+ 	self assert: SmallInteger maxVal printString  = (Smalltalk wordSize = 8 ifTrue: [ '1152921504606846975'] ifFalse: ['-1073741823']).
- 	self assert: SmallInteger minVal printString  = '-1073741824'.
- 	self assert: SmallInteger maxVal printString  = '1073741823'.
  	self assert: 12345 printString  = '12345'.
  	self assert: -54321 printString  = '-54321'.
  
  	self assert: 0 decimalDigitLength = 1.
  	self assert: 4 decimalDigitLength = 1.
  	self assert: 12 decimalDigitLength = 2.
  	self assert: 123 decimalDigitLength = 3.
  	self assert: 1234 decimalDigitLength = 4.
  	self assert: 56789 decimalDigitLength = 5.
  	self assert: 657483 decimalDigitLength = 6.
  	self assert: 6571483 decimalDigitLength = 7.
  	self assert: 65174383 decimalDigitLength = 8.
  	self assert: 625744831 decimalDigitLength = 9.
  	self assert: 1000001111 decimalDigitLength = 10.
+ 	self assert: SmallInteger maxVal decimalDigitLength = (Smalltalk wordSize = 8 ifTrue: [19] ifFalse: [10]).!
- 	self assert: SmallInteger maxVal decimalDigitLength = 10.!



More information about the Packages mailing list