[squeak-dev] Re: CI ftw

Dale Henrichs dhenrich at vmware.com
Fri Aug 31 04:20:06 UTC 2012



----- Original Message -----
| From: "Frank Shearar" <frank.shearar at gmail.com>
| 
| I'm aiming to, at some point in the very near future, implement some
| kind of minimal CI infrastructure that could take a ConfigurationOf
| and run its tests. I was hoping builderCI could do it, but it's quite
| a complicated beast.

Frank,

I think the interesting bit in builderCI that you're looking for to construct the test suite is probably this chunk of code that leverages the Metacello scripting api:

  | suite configurationClassNameList |
  configurationClassNameList := #( "list of configuration classes" ).
  suite := TestCase suiteClass named: configurationClassNameList printString, ' Test Suite'.
  configurationClassNameList
    do: [ :className | 
      ((MetacelloProjectRegistration
        registrationForClassNamed: className
        ifAbsent: [ self error: className printString , ' not registered (loaded)' ])
          currentlyLoadedClassesInProject select: [ :cl | cl inheritsFrom: TestCase ])
            do: [ :cl | 
              cl isAbstract
                ifFalse: [ suite addTest: cl buildSuiteFromSelectors ] ] ].
 
Dale


More information about the Squeak-dev mailing list