--- a/RegressionTests__ClassBuilderTests.st	Wed Jun 29 21:40:53 2016 +0100
+++ b/RegressionTests__ClassBuilderTests.st	Thu Jun 30 09:02:08 2016 +0100
@@ -22,24 +22,24 @@
     | pool class |
 
     pool := SharedPool subclass: #MockSharedPool1
-        instanceVariableNames: ''
-        classVariableNames: 'PoolVar1 PoolVar2'
-        poolDictionaries: ''  
-        category: 'System-Compiler-Mocks'.
+	instanceVariableNames: ''
+	classVariableNames: 'PoolVar1 PoolVar2'
+	poolDictionaries: ''
+	category: 'System-Compiler-Mocks'.
 
     class := Object subclass: #MockClass
-        instanceVariableNames: ''
-        classVariableNames: ''
-        poolDictionaries: 'MockSharedPool1'
-        category: 'System-Compiler-Mocks'.
+	instanceVariableNames: ''
+	classVariableNames: ''
+	poolDictionaries: 'MockSharedPool1'
+	category: 'System-Compiler-Mocks'.
 
     self assert: class sharedPoolNames asArray = #(MockSharedPool1).
 
     class := Object subclass: #MockClass
-        instanceVariableNames: ''
-        classVariableNames: ''
-        poolDictionaries: ''
-        category: 'System-Compiler-Mocks'.
+	instanceVariableNames: ''
+	classVariableNames: ''
+	poolDictionaries: ''
+	category: 'System-Compiler-Mocks'.
 
     self assert: class sharedPoolNames isEmpty.
 
@@ -59,37 +59,37 @@
     | pool class |
 
     pool := SharedPool subclass: #MockSharedPool1
-        instanceVariableNames: ''
-        classVariableNames: 'PoolVar1 PoolVar2'
-        poolDictionaries: ''  
-        category: '* Mocks *'.
+	instanceVariableNames: ''
+	classVariableNames: 'PoolVar1 PoolVar2'
+	poolDictionaries: ''
+	category: '* Mocks *'.
 
     class := Object subclass: #MockClassA
-        instanceVariableNames: ''
-        classVariableNames: ''
-        poolDictionaries: ''
-        category: '* Mocks *'.
+	instanceVariableNames: ''
+	classVariableNames: ''
+	poolDictionaries: ''
+	category: '* Mocks *'.
 
     class := Object subclass: #MockClassX
-        instanceVariableNames: ''
-        classVariableNames: ''
-        poolDictionaries: ''
-        category: '* Mocks *'.
+	instanceVariableNames: ''
+	classVariableNames: ''
+	poolDictionaries: ''
+	category: '* Mocks *'.
 
     class := (Smalltalk at:#MockClassX) subclass: #MockClassY
-        instanceVariableNames: ''
-        classVariableNames: ''
-        poolDictionaries: 'MockSharedPool1'
-        category: '* Mocks *'.
+	instanceVariableNames: ''
+	classVariableNames: ''
+	poolDictionaries: 'MockSharedPool1'
+	category: '* Mocks *'.
 
     self assert: (Smalltalk at:#MockClassX) superclass == Object.
     self assert: (Smalltalk at:#MockClassY) sharedPoolNames asArray = #(MockSharedPool1).
 
     class := (Smalltalk at:#MockClassA) subclass: #MockClassX
-        instanceVariableNames: ''
-        classVariableNames: ''
-        poolDictionaries: ''
-        category: '* Mocks *'.
+	instanceVariableNames: ''
+	classVariableNames: ''
+	poolDictionaries: ''
+	category: '* Mocks *'.
 
 
     self assert: (Smalltalk at:#MockClassY) superclass == (Smalltalk at:#MockClassX).