core: I messed up the refactoring. with-scope should go away, but so should with...

[factor.git] / core / continuations / continuations-tests.factor

diff --git a/core/continuations/continuations-tests.factor b/core/continuations/continuations-tests.factor
index 1d16b6a14155ba8d8a6d47fc97f63a9cf4b8f2d9..cc836b45d168257d27dafc12bd5de0b264ae20d2 100644 (file)
--- a/core/continuations/continuations-tests.factor
+++ b/core/continuations/continuations-tests.factor
@@ -16,9 +16,10 @@ IN: continuations.tests
 : callcc-namespace-test ( -- ? )
     [
         "test-cc" set
-        5 "x" [
+        5 "x" set
+        H{ } clone [
             6 "x" set "test-cc" get continue
-        ] with-variable
+        ] with-variables
     ] callcc0 "x" get 5 = ;
 
 { t } [ 10 callcc1-test 10 iota reverse >vector = ] unit-test