quickSelfTest/SelfTest.st
changeset 17 bb8bd2756d71
parent 16 d14443d7e920
child 18 587031fd105b
equal deleted inserted replaced
16:d14443d7e920 17:bb8bd2756d71
    35 Smalltalk installAutoloadedClassesFromAbbrevFile:((Smalltalk projectDirectoryForPackage:'exept:regression') asFilename / 'abbrev.stc').
    35 Smalltalk installAutoloadedClassesFromAbbrevFile:((Smalltalk projectDirectoryForPackage:'exept:regression') asFilename / 'abbrev.stc').
    36 (Smalltalk allClassesInPackage:'exept:regression') do:[:each |
    36 (Smalltalk allClassesInPackage:'exept:regression') do:[:each |
    37     (#(
    37     (#(
    38 	'RegressionTests::ExternalInterfaceTests'
    38 	'RegressionTests::ExternalInterfaceTests'
    39 	'RegressionTests::ContextTest2'
    39 	'RegressionTests::ContextTest2'
       
    40 	'RegressionTests::StackFrameTest'
    40     ) includes:each name) ifTrue:[
    41     ) includes:each name) ifTrue:[
    41 	Stdout showCR:('Skipped ',each name,'...').
    42 	Stdout showCR:('Skipped ',each name,'...').
    42     ] ifFalse:[
    43     ] ifFalse:[
    43 	Stdout showCR:('Loading ',each name,'...').
    44 	Stdout showCR:('Loading ',each name,'...').
    44 	each autoload
    45 	each autoload