From: John Benediktsson <mrjbq7@gmail.com>
Date: Sat, 28 Jul 2012 02:16:31 +0000 (-0700)
Subject: continuations: add typing.
X-Git-Tag: 0.97~2744
X-Git-Url: https://gitweb.factorcode.org/gitweb.cgi?p=factor.git;a=commitdiff_plain;h=87f8505736717b4bc5526d71128fe93eec0b77f0

continuations: add typing.
---

diff --git a/core/continuations/continuations.factor b/core/continuations/continuations.factor
index 0d0c41c72d..249cc4c161 100644
--- a/core/continuations/continuations.factor
+++ b/core/continuations/continuations.factor
@@ -1,7 +1,7 @@
 ! Copyright (C) 2003, 2011 Slava Pestov.
 ! See http://factorcode.org/license.txt for BSD license.
-USING: accessors assocs combinators combinators.private kernel
-kernel.private make namespaces sequences vectors ;
+USING: accessors arrays assocs combinators combinators.private
+kernel kernel.private make namespaces sequences vectors ;
 IN: continuations
 
 : with-datastack ( stack quot -- new-stack )
@@ -35,7 +35,12 @@ SYMBOL: restarts
 
 PRIVATE>
 
-TUPLE: continuation data call retain name catch ;
+TUPLE: continuation
+{ data array }
+{ call callstack }
+{ retain array }
+{ name vector }
+{ catch vector } ;
 
 C: <continuation> continuation