[squeak-dev] The Trunk: Tests-bf.147.mcz
commits at source.squeak.org
commits at source.squeak.org
Fri Feb 24 15:30:46 UTC 2012
Bert Freudenberg uploaded a new version of Tests to project The Trunk:
http://source.squeak.org/trunk/Tests-bf.147.mcz
==================== Summary ====================
Name: Tests-bf.147
Author: bf
Time: 24 February 2012, 4:30:27.227 pm
UUID: aeaac33d-9796-44cd-909c-9b631f7dab4c
Ancestors: Tests-nice.146
MCVersionNameTest:
- more thorough testing of diffy version names
- add testing of branch names
=============== Diff against Tests-nice.146 ===============
Item was changed:
----- Method: MCVersionNameTest>>allValidFixtures (in category 'as yet unclassified') -----
allValidFixtures
+ ^ self standardFixtures , (self diffyFixtures pairsCollect: [:diffy :base | diffy])!
- ^ self standardFixtures , self diffyFixtures!
Item was added:
+ ----- Method: MCVersionNameTest>>diffyBranchFixtures (in category 'as yet unclassified') -----
+ diffyBranchFixtures
+ ^ #( 'Package.branch-author.123(origAuthor.122)' 'Package.branch-origAuthor.122'
+ 'Package.branch-author.123(origAuthor.122).mcd' 'Package.branch-origAuthor.122.mcd'
+ 'Package.branch-author.123(122)' 'Package.branch-author.122'
+ 'Package.branch-author.123(@origPackage-origAuthor.122)' 'origPackage-origAuthor.122'
+ 'Package-author.123(@origPackage.branch-origAuthor.122)' 'origPackage.branch-origAuthor.122'
+ ) collect:
+ [ : each | each asMCVersionName ]!
Item was changed:
----- Method: MCVersionNameTest>>diffyFixtures (in category 'as yet unclassified') -----
diffyFixtures
+ ^ #( 'Package-author.123(origAuthor.122)' 'Package-origAuthor.122'
+ 'Package-author.123(origAuthor.122).mcd' 'Package-origAuthor.122.mcd'
+ 'Package-author.123(122)' 'Package-author.122'
+ 'Package-author.123(@origPackage-origAuthor.122)' 'origPackage-origAuthor.122'
+ ) collect:
- ^ #('Package-author.123(origAuthor.122)' 'Package-author.123(origAuthor.122).mcd' ) collect:
[ : each | each asMCVersionName ]!
Item was added:
+ ----- Method: MCVersionNameTest>>testBranches (in category 'tests') -----
+ testBranches
+ | noBranch otherBranch withBranch |
+ noBranch := 'Package-author.123.mcz' asMCVersionName.
+ withBranch := 'Package.branch-author.123.mcz' asMCVersionName.
+ otherBranch := 'Package.other-author.123.mcz' asMCVersionName.
+ self
+ assert: 'Package' equals: noBranch packageName;
+ assert: 'Package' equals: withBranch packageName;
+ assert: 'Package-author.123' equals: noBranch versionName;
+ assert: 'Package.branch-author.123' equals: withBranch versionName;
+ assert: 'Package' equals: noBranch packageAndBranchName;
+ assert: 'Package.branch' equals: withBranch packageAndBranchName;
+ deny: noBranch = withBranch;
+ deny: withBranch = noBranch;
+ deny: withBranch = otherBranch.
+
+ !
Item was changed:
----- Method: MCVersionNameTest>>testDiffyNames (in category 'tests') -----
testDiffyNames
+ self diffyFixtures, self diffyBranchFixtures pairsDo: [ :diffy :base |
+ self verifyDiffy: diffy base: base ]!
- self diffyFixtures do: [ : each | self verifyAncestryAttributes: each ]!
Item was removed:
- ----- Method: MCVersionNameTest>>verifyAncestryAttributes: (in category 'as yet unclassified') -----
- verifyAncestryAttributes: aMCFileName
- self
- assert: aMCFileName ancestorVersionNumber = 122 ;
- assert: aMCFileName ancestorAuthor = 'origAuthor'!
Item was added:
+ ----- Method: MCVersionNameTest>>verifyDiffy:base: (in category 'as yet unclassified') -----
+ verifyDiffy: diffyMCVersionName base: expectedBaseMCVersionName
+ self
+ assert: diffyMCVersionName baseVersionName = expectedBaseMCVersionName!
Item was changed:
----- Method: MCVersionNameTest>>verifyPackageAuthorVersion: (in category 'as yet unclassified') -----
verifyPackageAuthorVersion: aMCFileName
self
+ assert: aMCFileName versionName = 'Package-author.123';
assert: aMCFileName packageName = 'Package' ;
assert: aMCFileName versionNumber = 123 ;
assert: aMCFileName author = 'author' ;
assert: aMCFileName isValid!
More information about the Squeak-dev
mailing list
|