quickSelfTest/SelfTest.st
changeset 297 a850936897fd
parent 130 ae4a40e279d6
child 298 a170cf03d2b0
equal deleted inserted replaced
293:7798bf9ef44b 297:a850936897fd
    28 Stdout showCR:'Selftest Started'.
    28 Stdout showCR:'Selftest Started'.
    29 !
    29 !
    30 
    30 
    31 Stdout showCR:'Loading sunit...'.
    31 Stdout showCR:'Loading sunit...'.
    32 Smalltalk loadPackage:'stx:goodies/sunit'.
    32 Smalltalk loadPackage:'stx:goodies/sunit'.
    33 self assert:(TestCase notNil and:[TestCase isLoaded]).
    33 self assert:(TestCase notNil and:[TestCase isLoaded]) message:'[Error]: Missing TestCase class after sunit package load'.
    34 
    34 
    35 "/ Smalltalk loadPackage:'stx:goodies/xml/vw'.
    35 "/ Smalltalk loadPackage:'stx:goodies/xml/vw'.
    36 "/ Smalltalk loadPackage:'stx:goodies/xml/stx'.
    36 "/ Smalltalk loadPackage:'stx:goodies/xml/stx'.
    37 Smalltalk loadPackage:'stx:libcompat'.
    37 Smalltalk loadPackage:'stx:libcompat'.
    38 Smalltalk loadPackage:'stx:libjavascript'.
    38 Smalltalk loadPackage:'stx:libjavascript'.