diff --git a/library/continuations.factor b/library/continuations.factor
index 6018ff6425..cfc4b3dff0 100644
--- a/library/continuations.factor
+++ b/library/continuations.factor
@@ -41,7 +41,7 @@ TUPLE: interp data call name catch ;
     r> call ; inline
 
 : callcc0 ( quot ++ | quot: cont -- | cont: ++ )
-    "use with-continuation instead" throw ;
+    with-continuation ;
 
 : callcc1 ( quot ++ obj | quot: cont -- | cont: obj ++ obj )
-    "use with-continuation instead" throw ;
+    with-continuation ;