[squeak-dev] The Trunk: CollectionsTests-bf.225.mcz

commits at source.squeak.org commits at source.squeak.org
Mon Dec 8 00:34:09 UTC 2014


Bert Freudenberg uploaded a new version of CollectionsTests to project The Trunk:
http://source.squeak.org/trunk/CollectionsTests-bf.225.mcz

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

Name: CollectionsTests-bf.225
Author: bf
Time: 8 December 2014, 1:33:54.357 am
UUID: f5cc8617-fe9b-48a4-8a4a-6768918a0e36
Ancestors: CollectionsTests-eem.224

Restore timestamps lost in assignment conversion.

=============== Diff against CollectionsTests-eem.224 ===============

Item was changed:
  ----- Method: AssociationTest>>setUp (in category 'setup') -----
  setUp
  
  	a := 1 -> 'one'.
  	b := 1 -> 'een'.!

Item was changed:
  ----- Method: ReadStreamTest>>testUpToAll (in category 'tests - accessing') -----
  testUpToAll
  
  	self assert: (self streamOn: 'abcdefgh' upToAll: 'cd') = 'ab'.
  	self assert: (self streamOn: 'abcdefgh' upToAll: 'cd' upToAll: 'gh') = 'ef'.
  
  	self assert: (self streamOn: '' upToAll: '') = ''.
  
  	self assert: (self streamOn: 'a' upToAll: '') = ''.
  	self assert: (self streamOn: 'a' upToAll: 'a') = ''.
  	self assert: (self streamOn: 'a' upToAll: 'b') = 'a'.
  
  	self assert: (self streamOn: 'ab' upToAll: '') = ''.
  	self assert: (self streamOn: 'ab' upToAll: 'a') = ''.
  	self assert: (self streamOn: 'ab' upToAll: 'b') = 'a'.
  	self assert: (self streamOn: 'ab' upToAll: 'c') = 'ab'.
  	self assert: (self streamOn: 'ab' upToAll: 'ab') = ''.
  
  	self assert: (self streamOn: 'abc' upToAll: '') = ''.
  	self assert: (self streamOn: 'abc' upToAll: 'a') = ''.
  	self assert: (self streamOn: 'abc' upToAll: 'b') = 'a'.
  	self assert: (self streamOn: 'abc' upToAll: 'c') = 'ab'.
  	self assert: (self streamOn: 'abc' upToAll: 'd') = 'abc'.
  	self assert: (self streamOn: 'abc' upToAll: 'ab') = ''.
  	self assert: (self streamOn: 'abc' upToAll: 'bc') = 'a'.
  	self assert: (self streamOn: 'abc' upToAll: 'cd') = 'abc'.
  !

Item was changed:
  ----- Method: TextFontChangeTest>>testHash (in category 'tests') -----
  testHash
  	"test that different instances of the same TextFontChange hash to the 
  	same value"
  	| hashes hash |
  	hashes := OrderedCollection new.
  	1
  		to: 100
  		do: [:i | hashes add: TextFontChange defaultFontChange hash].
  	hash := hashes at: 1.
  	2
  		to: 100
  		do: [:i | self assert: (hashes at: i)
  					= hash]!



More information about the Squeak-dev mailing list