[Pkg] The Trunk: KernelTests-cmm.182.mcz

commits at source.squeak.org commits at source.squeak.org
Wed Apr 13 15:53:47 UTC 2011


Chris Muller uploaded a new version of KernelTests to project The Trunk:
http://source.squeak.org/trunk/KernelTests-cmm.182.mcz

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

Name: KernelTests-cmm.182
Author: cmm
Time: 13 April 2011, 10:53:28.766 am
UUID: 1f54cb32-49d2-4194-9eda-06c15ce6baab
Ancestors: KernelTests-cmm.181

- Use hand-chosen fixtures rather than a time-based test.

=============== Diff against KernelTests-cmm.181 ===============

Item was changed:
  ----- Method: IntegerTest>>testBitReversal (in category 'tests - bitLogic') -----
  testBitReversal
+ 	{ 0. 1. SmallInteger maxVal-1. SmallInteger maxVal. SmallInteger maxVal+1. (2 raisedTo: 64)-1091. (2 raisedTo: 64)-1090. (2 raisedTo: 64)-1 } do: 
+ 		[ : fixture |
+ 		| printedThenReversed reversedThenPrinted |
- 	| started expir fixture |
- 	started := Time millisecondClockValue.
- 	expir := ((self timeoutForTest-1)*1000) min: 5000.
- 	fixture := 0.
- 	[ (Time millisecondsSince: started) < expir ] whileTrue: 
- 		[ | printedThenReversed reversedThenPrinted |
  		printedThenReversed := (fixture printPaddedWith: $0 to: 64 base: 2) reversed.
  		reversedThenPrinted := (fixture bitReverse: 64) printPaddedWith: $0 to: 64 base: 2.
  		self assert: printedThenReversed = reversedThenPrinted.
  		fixture := fixture+1 ]!



More information about the Packages mailing list