quickSelfTest/Start.st
changeset 532 59170f299fc2
parent 530 224f4c82346c
equal deleted inserted replaced
531:6a00d0c7450e 532:59170f299fc2
    16 	Stdout showCR:'error: missing #TestCase class after sunit package load'.
    16 	Stdout showCR:'error: missing #TestCase class after sunit package load'.
    17 	Smalltalk exit:1.
    17 	Smalltalk exit:1.
    18 ].
    18 ].
    19 
    19 
    20 Smalltalk loadPackage:'stx:goodies/xml/xpath'.
    20 Smalltalk loadPackage:'stx:goodies/xml/xpath'.
    21 (XPathParser notNil and:[XPathParser isLoaded]) ifFalse:[
    21 (XML::XPathParser notNil and:[XML::XPathParser isLoaded]) ifFalse:[
    22     Stdout showCR:'error: missing #XPathParser class after goodies/xml/xpath package load'.
    22     Stdout showCR:'error: missing #XPathParser class after goodies/xml/xpath package load'.
    23     Smalltalk exit:1.
    23     Smalltalk exit:1.
    24 ].
    24 ].
    25 
    25 
    26 Smalltalk
    26 Smalltalk