RegressionTests__ProjectDefinitionTests.st
branchjv
changeset 1485 5a1aadddbc7f
parent 1087 b76941bb0907
child 1499 26a16a04219b
--- a/RegressionTests__ProjectDefinitionTests.st	Tue Mar 08 08:02:28 2016 +0000
+++ b/RegressionTests__ProjectDefinitionTests.st	Tue Apr 05 19:13:28 2016 +0100
@@ -96,7 +96,13 @@
     Test of filein of a extension with non-ASCII/ISO8859-1 chars
     "
 
-    Smalltalk loadPackage: 'exept:regression/testData/packages/p1utf8'.
+    Transcript showCR:'loading p1utf8 package...'.
+    [
+        Smalltalk loadPackage: 'exept:regression/testData/packages/p1utf8'.
+    ] ifCurtailed:[
+        thisContext fullPrintAll
+    ].    
+    Transcript showCR:'done.'.
 
     self assert: (Smalltalk at:#ProjectDefinitionTestsP1UTF8Bar) notNil.
     self assert: (Smalltalk at:#ProjectDefinitionTestsP1UTF8Bar) new zork size = 38.
@@ -105,6 +111,9 @@
     self assert: nil zork size = 38.
     self assert: nil zork = 'Příliš žluťoučký kůň úpěl ďábelské ódy'.
 
+    Transcript showCR:'test done.'.
+    Smalltalk unloadPackage: 'exept:regression/testData/packages/p1utf8'.
+
     "Created: / 22-03-2013 / 11:44:15 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !