From ec7dbeee657584aa80e32d200ac15c8c168c7c65 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Wed, 2 Dec 2009 19:39:21 +0000
Subject: [PATCH] fix runstack reset in future thread

svn: r17164
---
 src/mzscheme/src/future.c | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/src/mzscheme/src/future.c b/src/mzscheme/src/future.c
index 44372d4111..fccd214156 100644
--- a/src/mzscheme/src/future.c
+++ b/src/mzscheme/src/future.c
@@ -820,7 +820,9 @@ void *worker_thread_future_loop(void *arg)
   //including runtime calls. 
   //If jitcode asks the runrtime thread to do work, then
   //a GC can occur.
-  LOG("Running JIT code at %p...\n", ft->code);    
+  LOG("Running JIT code at %p...\n", ft->code);
+
+  MZ_RUNSTACK = MZ_RUNSTACK_START + fts->runstack_size;
 
   scheme_current_thread->error_buf = &newbuf;
   if (scheme_future_setjmp(newbuf)) {