RegressionTests__TSTreeTests.st
branchjv
changeset 1500 d406a10b2965
parent 1499 26a16a04219b
parent 1447 2351db93aa5b
--- a/RegressionTests__TSTreeTests.st	Wed Jun 29 21:40:53 2016 +0100
+++ b/RegressionTests__TSTreeTests.st	Thu Jun 30 09:02:08 2016 +0100
@@ -14,8 +14,8 @@
 
 setUp
     tree := self tstreeClass new.
-    self words shuffled do:[:ea | 
-        tree at:ea put:ea asUppercase
+    self words shuffled do:[:ea |
+	tree at:ea put:ea asUppercase
     ].
     empty := self tstreeClass new.
 !
@@ -25,7 +25,7 @@
 	self assert: (tree at: 'abelmosk') = 'ABELMOSK'.
 	self assert: (tree at: 'abracadabra' ifAbsent: [42]) = 42.
 	self assert: (tree at: '' ifAbsent: [42]) = 42.
-	self assert: (empty at: 'foo' ifAbsent: [42]) = 42 
+	self assert: (empty at: 'foo' ifAbsent: [42]) = 42
 !
 
 testMatch
@@ -101,7 +101,7 @@
 aberroscope
 aberuncator
 abet
-abetment) 
+abetment)
 ! !
 
 !TSTreeTests class methodsFor:'documentation'!