factor: ?if to ?if-old

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

diff --git a/core/continuations/continuations.factor b/core/continuations/continuations.factor
index e192f47bfd927a7f1e28520843af12b7d99828e3..2df10575262b960bbd94049c3898d90f582e16ef 100644 (file)
--- a/core/continuations/continuations.factor
+++ b/core/continuations/continuations.factor
@@ -59,7 +59,7 @@ C: <continuation> continuation
 PRIVATE>
 
 : ifcc ( capture restore -- )
-    [ dummy-1 current-continuation ] 2dip [ dummy-2 ] prepose ?if ; inline
+    [ dummy-1 current-continuation ] 2dip [ dummy-2 ] prepose ?if-old ; inline
 
 : callcc0 ( quot -- ) [ drop ] ifcc ; inline