*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Sun, 31 Jul 2011 14:00:49 +0200
changeset 44674a8d2574e
parent 3 62bd5f071940
child 5 d1cb14c9f8fc
*** empty log message ***
quickSelfTest/SelfTest.st
     1.1 --- a/quickSelfTest/SelfTest.st	Sun Jul 31 13:43:57 2011 +0200
     1.2 +++ b/quickSelfTest/SelfTest.st	Sun Jul 31 14:00:49 2011 +0200
     1.3 @@ -33,9 +33,13 @@
     1.4  Smalltalk installAutoloadedClassesFromAbbrevFile:((Smalltalk projectDirectoryForPackage:'exept:regression') asFilename / 'abbrev.stc').
     1.5  !
     1.6  
     1.7 -|result|
     1.8 +|suite result|
     1.9  
    1.10 -result := RegressionTests::IntegerTest runTests.
    1.11 +suite := TestSuite named:'SelfTest'.
    1.12 +suite addTest:(RegressionTests::IntegerTest suite).
    1.13 +suite addTest:(RegressionTests::CollectionTests suite).
    1.14 +
    1.15 +result := suite run.
    1.16  TestResultReporter report:result format:#xml_perfPublisher as:'testresult.xml'.
    1.17  
    1.18  "/Autoload allSubclassesDo:[:cls |