From 59777ca17ac5aa59b18c1f49cff63c32f3af14dd Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Mon, 9 Mar 2015 13:33:19 -0600
Subject: [PATCH] increase time thread's stack size

On 64-bit FreeBSD 10.1, 4k is too small.
---
 racket/src/racket/src/port.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/racket/src/racket/src/port.c b/racket/src/racket/src/port.c
index e7ad356739..4ee437fefc 100644
--- a/racket/src/racket/src/port.c
+++ b/racket/src/racket/src/port.c
@@ -11047,7 +11047,7 @@ static void start_green_thread_timer(intptr_t usec)
   itimerdata->jit_stack_boundary_ptr = &scheme_jit_stack_boundary;
   pthread_mutex_init(&itimerdata->mutex, NULL);
   pthread_cond_init(&itimerdata->cond, NULL);
-  tmp = mz_proc_thread_create_w_stacksize(green_thread_timer, itimerdata, 4096);
+  tmp = mz_proc_thread_create_w_stacksize(green_thread_timer, itimerdata, 16384);
   itimerdata->thread = tmp;
   itimerdata->itimer = 1;
 }