--- a/RegressionTests__PowerSetTests.st Wed Jun 29 13:00:17 2016 +0000
+++ b/RegressionTests__PowerSetTests.st Wed Jun 29 15:55:29 2016 +0200
@@ -1,4 +1,4 @@
-"{ Package: 'exept:regression' }"
+"{ Package: 'stx:goodies/regression' }"
"{ NameSpace: RegressionTests }"
@@ -24,16 +24,16 @@
self assert:(p size = 8). "/ [] [1] [2] [3] [1 2] [1 3] [2 3] [1 2 3]
#(
- #()
- #(1)
- #(2)
- #(3)
- #(1 2)
- #(1 3)
- #(2 3)
- #(1 2 3)
+ #()
+ #(1)
+ #(2)
+ #(3)
+ #(1 2)
+ #(1 3)
+ #(2 3)
+ #(1 2 3)
) do:[:eachExpectedElement |
- self assert:(p includes: eachExpectedElement asSet).
+ self assert:(p includes: eachExpectedElement asSet).
].
"
@@ -47,7 +47,7 @@
p := PowerSet for:(1 to:1000).
self assert:(p notEmpty).
- self assert:(p size = (2 raisedTo:1000)).
+ self assert:(p size = (2 raisedTo:1000)).
"
self new test02