--- 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'!