Remove unused word

2006-07-31 20:13:12 +00:00 · 2006-07-31 20:13:12 +00:00 · 373bbbee95
parent ec4d9b4932
commit 373bbbee95
1 changed files with 0 additions and 5 deletions
--- a/library/tools/interpreter.factor
+++ b/library/tools/interpreter.factor
@ -90,11 +90,6 @@ SYMBOL: callframe-end
 : <callframe> ( quot -- seq )
    0 over length 3array ;

-: quot>cont ( quot -- continuation )
-    <callframe> >vector
-    <empty-continuation>
-    [ set-continuation-call ] keep ;
-
 : catch-harness ( continuation -- quot )
    [ [ c> 2array ] % , \ continue-with , ] [ ] make ;