Permalink
Browse files

Issue #110: added unit tests

(cherry picked from commit 3ec33ef)

Conflicts:

	repository/Metacello-TestsMC.package/MetacelloConfigurationResource.class/instance/setUp.st
	repository/Metacello-TestsMC.package/MetacelloConfigurationResource.class/methodProperties.json
	repository/Metacello-TestsMC.package/monticello.meta/version
  • Loading branch information...
1 parent d19d4eb commit e9f8f9a5e9da056a3284aeb7f0633649d2f5bea8 Dale Henrichs committed Sep 11, 2012
Showing with 493 additions and 160 deletions.
  1. +13 −0 ...cello-TestsMC.package/MetacelloConfigurationResource.class/instance/baselineVersion20Issue125..st
  2. +11 −0 ...cello-TestsMC.package/MetacelloConfigurationResource.class/instance/baselineVersion30Issue125..st
  3. +21 −18 repository/Metacello-TestsMC.package/MetacelloConfigurationResource.class/instance/setUp.st
  4. +61 −0 ...tsMC.package/MetacelloConfigurationResource.class/instance/setUpConfigurationOfProjectIssue125.st
  5. +26 −0 ...ory/Metacello-TestsMC.package/MetacelloConfigurationResource.class/instance/version30Issue125..st
  6. +187 −141 repository/Metacello-TestsMC.package/MetacelloConfigurationResource.class/methodProperties.json
  7. 0 repository/Metacello-TestsMC.package/MetacelloMCIssue125TestCase.class/README.md
  8. +5 −0 ...y/Metacello-TestsMC.package/MetacelloMCIssue125TestCase.class/instance/configurationRepository.st
  9. +7 −0 repository/Metacello-TestsMC.package/MetacelloMCIssue125TestCase.class/instance/hasPackage..st
  10. +4 −0 ...tory/Metacello-TestsMC.package/MetacelloMCIssue125TestCase.class/instance/monticelloRepository.st
  11. +4 −0 repository/Metacello-TestsMC.package/MetacelloMCIssue125TestCase.class/instance/project.st
  12. +3 −0 repository/Metacello-TestsMC.package/MetacelloMCIssue125TestCase.class/instance/projectClass.st
  13. +3 −0 repository/Metacello-TestsMC.package/MetacelloMCIssue125TestCase.class/instance/projectName.st
  14. +8 −0 repository/Metacello-TestsMC.package/MetacelloMCIssue125TestCase.class/instance/projectWith..st
  15. +8 −0 repository/Metacello-TestsMC.package/MetacelloMCIssue125TestCase.class/instance/runCase.st
  16. +14 −0 repository/Metacello-TestsMC.package/MetacelloMCIssue125TestCase.class/instance/setUp.st
  17. +13 −0 repository/Metacello-TestsMC.package/MetacelloMCIssue125TestCase.class/instance/tearDown.st
  18. +7 −0 ...tory/Metacello-TestsMC.package/MetacelloMCIssue125TestCase.class/instance/tearDownPackageNames.st
  19. +13 −0 ...cello-TestsMC.package/MetacelloMCIssue125TestCase.class/instance/testForDoListAtrribute1Active.st
  20. +13 −0 ...cello-TestsMC.package/MetacelloMCIssue125TestCase.class/instance/testForDoListAtrribute2Active.st
  21. +13 −0 ...sMC.package/MetacelloMCIssue125TestCase.class/instance/testForDoListAttribute1Atrribute2Active.st
  22. +13 −0 ...sMC.package/MetacelloMCIssue125TestCase.class/instance/testForDoListAttribute2Atrribute1Active.st
  23. +11 −0 ...ry/Metacello-TestsMC.package/MetacelloMCIssue125TestCase.class/instance/testForDoListNotActive.st
  24. +20 −0 repository/Metacello-TestsMC.package/MetacelloMCIssue125TestCase.class/methodProperties.json
  25. +14 −0 repository/Metacello-TestsMC.package/MetacelloMCIssue125TestCase.class/properties.json
  26. +1 −1 repository/Metacello-TestsMC.package/monticello.meta/version
@@ -0,0 +1,13 @@
+Issue 125
+baselineVersion20Issue125: spec
+ <version: '2.0-baseline'>
+ spec
+ for: #'common'
+ do: [
+ spec blessing: #'baseline'.
+ spec description: 'MetacelloConfigurationResource>>baselineVersion20Issue125:'.
+ spec repository: 'dictionary://Metacello_Gofer_Test_Repository'.
+ spec
+ package: 'GoferFoo';
+ package: 'GoferBar' with: [ spec requires: 'GoferFoo' ];
+ yourself ]
@@ -0,0 +1,11 @@
+Issue 125
+baselineVersion30Issue125: spec
+ <version: '3.0-baseline' imports: #('2.0-baseline')>
+ spec
+ for: #(#'attribute1' #'attribute2')
+ do: [
+ spec description: 'MetacelloConfigurationResource>>baselineVersion30Issue125:'.
+ spec
+ package: 'GoferFaux' with: [ spec requires: 'GoferFoo' ];
+ package: 'GoferBeau' with: [ spec requires: 'GoferFaux' ];
+ yourself ]
@@ -1,20 +1,23 @@
running
setUp
- super setUp.
- self
- setUpMonticelloRepository;
- setUpConfigurationOfFoo;
- setUpConfigurationOfFeaux;
- setUpConfigurationOfProjectFie;
- setUpConfigurationOfProjectFee;
- setUpConfigurationOfFum;
- setUpConfigurationOfProjectFoe;
- setUpConfigurationOfFan;
- setUpConfigurationOfFix;
- setUpIssue77;
- setUpIssue95;
- setUpConfigurationOfSymbolic;
- setUpConfigurationOfProjectToolBox;
- setUpConfigurationOfProjectIssue115;
- setUpConfigurationOfProjectIssue136;
- yourself
+ "self reset"
+
+ super setUp.
+ self
+ setUpMonticelloRepository;
+ setUpConfigurationOfFoo;
+ setUpConfigurationOfFeaux;
+ setUpConfigurationOfProjectFie;
+ setUpConfigurationOfProjectFee;
+ setUpConfigurationOfFum;
+ setUpConfigurationOfProjectFoe;
+ setUpConfigurationOfFan;
+ setUpConfigurationOfFix;
+ setUpIssue77;
+ setUpIssue95;
+ setUpConfigurationOfSymbolic;
+ setUpConfigurationOfProjectToolBox;
+ setUpConfigurationOfProjectIssue115;
+ setUpConfigurationOfProjectIssue136;
+ setUpConfigurationOfProjectIssue125;
+ yourself
@@ -0,0 +1,61 @@
+Issue 125
+setUpConfigurationOfProjectIssue125
+ "self reset"
+
+ | reference className definitionArray versionInfo |
+ reference := GoferVersionReference name: 'MetacelloTestConfigurationOfProjectIssue125-dkh.1'.
+ className := reference packageName asSymbol.
+ definitionArray := {(MCOrganizationDefinition categories: (Array with: className)).
+ (MCClassDefinition
+ name: className
+ superclassName: #'Object'
+ category: className
+ instVarNames: #()
+ comment: '').
+ (MCMethodDefinition
+ className: className asString
+ classIsMeta: true
+ selector: 'project'
+ category: 'cat'
+ timeStamp: ''
+ source: self projectClassMethodSource).
+ (MCMethodDefinition
+ className: className asString
+ selector: 'project'
+ category: 'cat'
+ timeStamp: ''
+ source: self projectMethodSource).
+ (MCMethodDefinition
+ className: className asString
+ selector: 'version30Issue125:'
+ category: 'cat'
+ timeStamp: ''
+ source: (self class sourceCodeAt: #'version30Issue125:') asString).
+ (MCMethodDefinition
+ className: className asString
+ selector: 'baselineVersion20Issue125:'
+ category: 'cat'
+ timeStamp: ''
+ source: (self class sourceCodeAt: #'baselineVersion20Issue125:') asString).
+ (MCMethodDefinition
+ className: className asString
+ selector: 'baselineVersion30Issue125:'
+ category: 'cat'
+ timeStamp: ''
+ source: (self class sourceCodeAt: #'baselineVersion30Issue125:') asString)}.
+ monticelloRepository
+ basicStoreVersion:
+ (MCVersion new
+ setPackage: (MetacelloTestsMCPackage new name: reference packageName)
+ info:
+ (versionInfo := MCVersionInfo
+ name: reference name
+ id: UUID new
+ message: 'This is a mock version'
+ date: Date today
+ time: Time now
+ author: reference author
+ ancestors: #())
+ snapshot: (MCSnapshot fromDefinitions: definitionArray)
+ dependencies: #()).
+ ^ versionInfo
@@ -0,0 +1,26 @@
+Issue 125
+version30Issue125: spec
+ <version: '3.0' imports: #('3.0-baseline')>
+ spec
+ for: #'common'
+ do: [
+ spec blessing: #'release'.
+ spec description: 'MetacelloConfigurationResource>>version30Issue125:'.
+ spec
+ package: 'GoferFoo' with: 'GoferFoo-lr.4';
+ package: 'GoferBar' with: 'GoferBar-jf.1';
+ yourself ].
+ spec
+ for: #'attribute1'
+ do: [
+ spec
+ package: 'GoferFaux' with: 'GoferFaux-tg.32';
+ package: 'GoferBeau' with: 'GoferBeau-dkh.55';
+ yourself ].
+ spec
+ for: #'attribute2'
+ do: [
+ spec
+ package: 'GoferFaux' with: 'GoferFaux-tg.33';
+ package: 'GoferBeau' with: 'GoferBeau-dkh.56';
+ yourself ]
Oops, something went wrong.

0 comments on commit e9f8f9a

Please sign in to comment.