[squeak-dev] The Inbox: Tests-cmm.117.mcz

commits at source.squeak.org commits at source.squeak.org
Tue Mar 8 21:28:19 UTC 2011


A new version of Tests was added to project The Inbox:
http://source.squeak.org/inbox/Tests-cmm.117.mcz

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

Name: Tests-cmm.117
Author: cmm
Time: 4 March 2011, 4:47:58.236 pm
UUID: fb24c430-6eae-48da-ba41-ac137356149d
Ancestors: Tests-cmm.116

- Updated tests for new MCVersionName.

=============== Diff against Tests-nice.115 ===============

Item was changed:
  ----- Method: MCMczInstallerTest>>fileName (in category 'as yet unclassified') -----
  fileName
+ 	^ 'InstallerTest.mcz' asMCVersionName!
- 	^ 'InstallerTest.mcz'!

Item was added:
+ MCTestCase subclass: #MCVersionNameTest
+ 	instanceVariableNames: ''
+ 	classVariableNames: ''
+ 	poolDictionaries: ''
+ 	category: 'Tests-Monticello'!

Item was added:
+ ----- Method: MCVersionNameTest>>allValidFixtures (in category 'as yet unclassified') -----
+ allValidFixtures
+ 	^ self standardFixtures , self diffyFixtures!

Item was added:
+ ----- Method: MCVersionNameTest>>diffyFixtures (in category 'as yet unclassified') -----
+ diffyFixtures
+ 	^ #('Package-author.123(origAuthor.122)' 'Package-author.123(origAuthor.122).mcd' ) collect:
+ 		[ : each | each asMCVersionName ]!

Item was added:
+ ----- Method: MCVersionNameTest>>invalidFixtures (in category 'as yet unclassified') -----
+ invalidFixtures
+ 	^ {String empty. 'abc'. '123' } collect: [ : each | each asMCVersionName ]!

Item was added:
+ ----- Method: MCVersionNameTest>>standardFixtures (in category 'as yet unclassified') -----
+ standardFixtures
+ 	^ #('Package-author.123' 'Package-author.123.mcz' ) collect:
+ 		[ : each | each asMCVersionName ]!

Item was added:
+ ----- Method: MCVersionNameTest>>testAttributeAccess (in category 'as yet unclassified') -----
+ testAttributeAccess
+ 	self allValidFixtures do: [ : each | self verifyPackageAuthorVersion: each ]!

Item was added:
+ ----- Method: MCVersionNameTest>>testDiffyNames (in category 'as yet unclassified') -----
+ testDiffyNames
+ 	self diffyFixtures do: [ : each | self verifyAncestryAttributes: each ]!

Item was added:
+ ----- Method: MCVersionNameTest>>testEquality (in category 'as yet unclassified') -----
+ testEquality
+ 	| standard mc |
+ 	standard := 'Package-author.123.mcz'.
+ 	mc := standard asMCVersionName.
+ 	self
+ 		 assert: standard = mc ;
+ 		 assert: mc = standard.
+ 	self assert: self allValidFixtures asSet size = 1!

Item was added:
+ ----- Method: MCVersionNameTest>>testInvalid (in category 'as yet unclassified') -----
+ testInvalid
+ 	self assert: (self invalidFixtures noneSatisfy: [ : each | each isValid ])!

Item was added:
+ ----- Method: MCVersionNameTest>>verifyAncestryAttributes: (in category 'as yet unclassified') -----
+ verifyAncestryAttributes: aMCFileName 
+ 	self
+ 		 assert: aMCFileName ancestorVersionNumber = 122 ;
+ 		 assert: aMCFileName ancestorAuthor = 'origAuthor'!

Item was added:
+ ----- Method: MCVersionNameTest>>verifyPackageAuthorVersion: (in category 'as yet unclassified') -----
+ verifyPackageAuthorVersion: aMCFileName 
+ 	self
+ 		 assert: aMCFileName packageName = 'Package' ;
+ 		 assert: aMCFileName versionNumber = 123 ;
+ 		 assert: aMCFileName author = 'author' ;
+ 		 assert: aMCFileName isValid!




More information about the Squeak-dev mailing list