--- a/RegressionTests__CompilerTest.st	Wed Jun 29 13:00:17 2016 +0000
+++ b/RegressionTests__CompilerTest.st	Wed Jun 29 15:55:29 2016 +0200
@@ -1,4 +1,4 @@
-"{ Package: 'exept:regression' }"
+"{ Package: 'stx:goodies/regression' }"
 
 "{ NameSpace: RegressionTests }"
 
@@ -35,10 +35,10 @@
 
 compile:code
     Class withoutUpdatingChangesDo:[
-        ^ Compiler
-            compile:code
-            forClass:self
-            install:false.
+	^ Compiler
+	    compile:code
+	    forClass:self
+	    install:false.
     ].
 ! !
 
@@ -273,9 +273,9 @@
 
 callEnsureWithException
     [
-        ProceedableError raiseRequest
+	ProceedableError raiseRequest
     ] ensure:[
-        ^ true
+	^ true
     ].
     ^ nil
 
@@ -1953,11 +1953,11 @@
     |parser|
 
     Smalltalk allClassesDo:[:eachClass |
-        Transcript showCR:'parsing all in ',eachClass name.
-        eachClass instAndClassSelectorsAndMethodsDo:[:sel :mthd |
-            parser := Parser parseMethod:(mthd source) in:(mthd mclass).
-            self assert:(parser ~~ #Error and:[parser tree ~= #Error and:[parser errorFlag ~~ true]]).
-        ].
+	Transcript showCR:'parsing all in ',eachClass name.
+	eachClass instAndClassSelectorsAndMethodsDo:[:sel :mthd |
+	    parser := Parser parseMethod:(mthd source) in:(mthd mclass).
+	    self assert:(parser ~~ #Error and:[parser tree ~= #Error and:[parser errorFlag ~~ true]]).
+	].
     ].
 
     "
@@ -1969,14 +1969,14 @@
     |parser|
 
     Smalltalk allClassesDo:[:eachClass |
-        Transcript showCR:'parsing all in ',eachClass name.
-        eachClass instAndClassSelectorsAndMethodsDo:[:sel :mthd |
-            parser := Parser parseMethod:(mthd source) in:(mthd mclass).
-            self assert:(parser ~~ #Error and:[parser tree ~= #Error and:[parser errorFlag ~~ true]]).
-            parser hasPrimitiveCode ifFalse:[
-                mthd mclass recompile:sel
-            ].
-        ].
+	Transcript showCR:'parsing all in ',eachClass name.
+	eachClass instAndClassSelectorsAndMethodsDo:[:sel :mthd |
+	    parser := Parser parseMethod:(mthd source) in:(mthd mclass).
+	    self assert:(parser ~~ #Error and:[parser tree ~= #Error and:[parser errorFlag ~~ true]]).
+	    parser hasPrimitiveCode ifFalse:[
+		mthd mclass recompile:sel
+	    ].
+	].
     ].
 
     "
@@ -1994,23 +1994,23 @@
     p := ParserFlags warnPlausibilityChecks.
 
     [
-        ParserFlags warnPlausibilityChecks:true.
-        ParserFlags warnAboutPossibleSTCCompilationProblems:true.
-        ParserFlags allowPossibleSTCCompilationProblems:false.
-        self should:[
-            self
-                compile:'
+	ParserFlags warnPlausibilityChecks:true.
+	ParserFlags warnAboutPossibleSTCCompilationProblems:true.
+	ParserFlags allowPossibleSTCCompilationProblems:false.
+	self should:[
+	    self
+		compile:'
 foo:arg
 ^ arg
     ifTrue:[^ 1]
     ifFalse:[2]
 '
-            ]
-            raise:Parser parseErrorSignal
+	    ]
+	    raise:Parser parseErrorSignal
     ] ensure:[
-        ParserFlags warnAboutPossibleSTCCompilationProblems:w.
-        ParserFlags allowPossibleSTCCompilationProblems:a.
-        ParserFlags warnPlausibilityChecks:p.
+	ParserFlags warnAboutPossibleSTCCompilationProblems:w.
+	ParserFlags allowPossibleSTCCompilationProblems:a.
+	ParserFlags warnPlausibilityChecks:p.
     ].
 
     "Created: / 16-11-2006 / 14:08:48 / cg"
@@ -2023,25 +2023,25 @@
     a := ParserFlags allowPossibleSTCCompilationProblems.
 
     [
-        ParserFlags warnAboutPossibleSTCCompilationProblems:false.
-        ParserFlags allowPossibleSTCCompilationProblems:true.
-
-        setOfSignals := SignalSet with:(Parser parseErrorSignal) with:(Parser parseWarningSignal).
-        self
-            shouldnt:
-                [
-                    self
-                        compile:'
+	ParserFlags warnAboutPossibleSTCCompilationProblems:false.
+	ParserFlags allowPossibleSTCCompilationProblems:true.
+
+	setOfSignals := SignalSet with:(Parser parseErrorSignal) with:(Parser parseWarningSignal).
+	self
+	    shouldnt:
+		[
+		    self
+			compile:'
 foo:arg
     ^ arg
-        ifTrue:[^ 1]
-        ifFalse:[2]
+	ifTrue:[^ 1]
+	ifFalse:[2]
 '
-                ]
-            raise:setOfSignals.
+		]
+	    raise:setOfSignals.
     ] ensure:[
-        ParserFlags warnAboutPossibleSTCCompilationProblems:w.
-        ParserFlags allowPossibleSTCCompilationProblems:a.
+	ParserFlags warnAboutPossibleSTCCompilationProblems:w.
+	ParserFlags allowPossibleSTCCompilationProblems:a.
     ]
 
     "Created: / 16-11-2006 / 14:33:29 / cg"
@@ -2052,17 +2052,17 @@
 
     setOfPossibleExceptions := SignalSet with:ParseWarning with:ParseError.
     self
-        shouldnt:
-            [
-                self
-                    compile:'
+	shouldnt:
+	    [
+		self
+		    compile:'
 foo:arg
     arg
-        ifTrue:[^ 1]
-        ifFalse:[^ 2]
+	ifTrue:[^ 1]
+	ifFalse:[^ 2]
 '
-            ]
-        raise:setOfPossibleExceptions.
+	    ]
+	raise:setOfPossibleExceptions.
 
     "Created: / 16-11-2006 / 14:16:53 / cg"
 !
@@ -2072,17 +2072,17 @@
 
     setOfPossibleExceptions := SignalSet with:(Parser parseWarningSignal) with:(Parser parseErrorSignal).
     self
-        shouldnt:
-            [
-                self
-                    compile:'
+	shouldnt:
+	    [
+		self
+		    compile:'
 foo:arg
     ^ arg
-        ifTrue:[1]
-        ifFalse:[2]
+	ifTrue:[1]
+	ifFalse:[2]
 '
-            ]
-        raise:setOfPossibleExceptions.
+	    ]
+	raise:setOfPossibleExceptions.
 
     "Created: / 16-11-2006 / 14:41:45 / cg"
 ! !