quickSelfTest/SelfTest.st
changeset 8 7a691ced6334
parent 7 dbf69a604f15
child 9 99d5004cb28f
equal deleted inserted replaced
7:dbf69a604f15 8:7a691ced6334
     1 "/
     1 "/
     2 "/ execute this script using the following command line:
     2 "/ execute this script using the following command line:
     3 "/
     3 "/
     4 "/ stx -nobanner -I --quick --execute SelfTest.st
     4 "/ stx --noBanner -I --execute SelfTest.st
     5 "/
     5 "/
     6 "/ to use with jenkins (+ perfPublisher plugin):
     6 "/ to use with jenkins (+ perfPublisher plugin):
     7 "/ use the following buildscript:
     7 "/ use the following buildscript (in jenkins):
     8 "/ (after checkout of stx)
     8 "/ (after checkout of stx)
     9 "/      cd stx
     9 "/      cd stx
    10 "/      call bmake
    10 "/      call bmake
    11 "/      cd goodies\selftest
    11 "/      cd goodies\selftest
    12 "/      ..\..\projects\smalltalk\stx.com --noBanner -I --execute SelfTest.st
    12 "/      ..\..\projects\smalltalk\stx.com --noBanner -I --execute SelfTest.st
    42 suite addTest:(RegressionTests::DelayTest suite).
    42 suite addTest:(RegressionTests::DelayTest suite).
    43 suite addTest:(RegressionTests::DictionaryTest suite).
    43 suite addTest:(RegressionTests::DictionaryTest suite).
    44 suite addTest:(RegressionTests::EnumerationTests suite).
    44 suite addTest:(RegressionTests::EnumerationTests suite).
    45 suite addTest:(RegressionTests::ExceptionTest suite).
    45 suite addTest:(RegressionTests::ExceptionTest suite).
    46 
    46 
    47 result := suite runBeforeEachDo:[:test | Stdout << ('running ',test printString). Stdout cr ].
    47 result := suite
    48 TestResultReporter report:result format:#xml_perfPublisher as:'testresult.xml'.
    48 	    runBeforeEachDo:[:test |
    49 
    49 		Stdout << ('running ',test printString). Stdout cr
    50 "/Autoload allSubclassesDo:[:cls |
    50 	    ].
    51 "/    cls package = 'exept:regression' ifTrue:[
    51 TestResultReporter
    52 "/        Stdout << cls name; cr.
    52     report:result
    53 "/        cls runTests.
    53     format:#xml_perfPublisher
    54 "/    ].
    54     as:'testresult.xml'.
    55 "/].
       
    56 !
    55 !