equal
deleted
inserted
replaced
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'. |