--- a/RegressionTests__TSTreeTests.st	Sat Aug 10 14:58:09 2019 +0200
+++ b/RegressionTests__TSTreeTests.st	Mon Aug 12 11:18:43 2019 +0200
@@ -10,7 +10,17 @@
 !
 
 
-!TSTreeTests methodsFor:'as yet unclassified'!
+!TSTreeTests methodsFor:'initialize / release'!
+
+setUp
+    tree := self tstreeClass new.
+    self words shuffled do:[:ea |
+	tree at:ea put:ea asUppercase
+    ].
+    empty := self tstreeClass new.
+! !
+
+!TSTreeTests methodsFor:'tests'!
 
 testAt
 	self assert: (tree at: 'abear') = 'ABEAR'.
@@ -96,16 +106,6 @@
 abetment)
 ! !
 
-!TSTreeTests methodsFor:'initialize / release'!
-
-setUp
-    tree := self tstreeClass new.
-    self words shuffled do:[:ea |
-	tree at:ea put:ea asUppercase
-    ].
-    empty := self tstreeClass new.
-! !
-
 !TSTreeTests class methodsFor:'documentation'!
 
 version