From 7fb8b3c40688862c2ee70215a3e1109795e6a192 Mon Sep 17 00:00:00 2001
From: Slava Pestov <slava@slava-pestovs-macbook-pro.local>
Date: Wed, 7 May 2008 04:22:48 -0500
Subject: [PATCH] Fix threads

---
 core/threads/threads.factor | 1 +
 1 file changed, 1 insertion(+)

diff --git a/core/threads/threads.factor b/core/threads/threads.factor
index 2a0d8e68ab..a1c7e208dc 100755
--- a/core/threads/threads.factor
+++ b/core/threads/threads.factor
@@ -213,6 +213,7 @@ GENERIC: error-in-thread ( error thread -- )
     initial-thread global
     [ drop f "Initial" <thread> ] cache
     <box> >>continuation
+    t >>runnable
     f >>state
     dup register-thread
     set-self ;