Initialize stack_top when a new thread is created.

diff --git a/src/thread.c b/src/thread.c
index 3b6134aaeb4afc5849cfdc3470152cf742349605..972beb2c46240e46cce094131af49f04d665c053 100644 (file)
--- a/src/thread.c
+++ b/src/thread.c
@@ -147,13 +147,13 @@ do_nothing (Lisp_Object whatever)
 static void *
 run_thread (void *state)
 {
-  char stack_bottom_variable;
+  char stack_pos;
   struct thread_state *self = state;
   struct thread_state **iter;
   struct gcpro gcpro1;
   Lisp_Object buffer;
 
-  self->stack_bottom = &stack_bottom_variable;
+  self->stack_top = self->stack_bottom = &stack_pos;
 
   self->m_specpdl_size = 50;
   self->m_specpdl = xmalloc (self->m_specpdl_size