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 ;