--- a/RegressionTests__TSTreeTests.st Wed Jun 29 13:00:17 2016 +0000
+++ b/RegressionTests__TSTreeTests.st Wed Jun 29 15:55:29 2016 +0200
@@ -1,4 +1,4 @@
-"{ Package: 'exept:regression' }"
+"{ Package: 'stx:goodies/regression' }"
"{ NameSpace: RegressionTests }"
@@ -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'!