From f32d4b0187690f9af2d8cfd6fa0b6e594fc9d0df Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Thu, 4 Sep 2014 16:01:53 +0200
Subject: [PATCH] minor cleanup on thread termination

---
 racket/src/racket/src/thread.c | 1 +
 1 file changed, 1 insertion(+)

diff --git a/racket/src/racket/src/thread.c b/racket/src/racket/src/thread.c
index 3e0ec3e0f4..ba10642651 100644
--- a/racket/src/racket/src/thread.c
+++ b/racket/src/racket/src/thread.c
@@ -2907,6 +2907,7 @@ static void thread_is_dead(Scheme_Thread *r)
   
   r->list_stack = NULL;
 
+  r->t_set_parent = NULL;
   r->dw = NULL;
   r->init_config = NULL;
   r->cell_values = NULL;