This adds thread-blocker, a function to examine what a thread is

blocked on.  I thought this would be another nice debugging addition.

1 files changed, 4 insertions, 0 deletions

diff --git a/src/thread.h b/src/thread.h
index 1a193b1e4ae..d21887a0928 100644
--- a/src/thread.h
+++ b/src/thread.h
@@ -44,6 +44,10 @@ struct thread_state
   Lisp_Object error_symbol;
   Lisp_Object error_data;
 
+  /* If we are waiting for some event, this holds the object we are
+     waiting on.  */
+  Lisp_Object event_object;
+
   /* m_gcprolist must be the first non-lisp field.  */
   /* Recording what needs to be marked for gc.  */
   struct gcpro *m_gcprolist;