Add assertion that thread is suspended when using context registers

* win32_threads.c (GC_push_stack_for): Add assertion that thread is
suspended (before using context registers) if thread is not self and
not blocked.

diff --git a/win32_threads.c b/win32_threads.c
index 3a44f56363ee87a0eb9e8873ac4dc868fd20ea84..bd1bbc86bbecf1e9bf352c330b4bb28e1c8d6e2d 100644 (file)
--- a/win32_threads.c
+++ b/win32_threads.c
@@ -1600,6 +1600,7 @@ STATIC word GC_push_stack_for(GC_thread thread, DWORD me)
       /* require looping.                                               */
       word *regs = thread->context_regs;
 
+      GC_ASSERT(thread->suspended);
       sp = thread->context_sp;
 #   else
       /* For unblocked threads call GetThreadContext(). */
@@ -1607,6 +1608,7 @@ STATIC word GC_push_stack_for(GC_thread thread, DWORD me)
       {
         CONTEXT context;
 
+        GC_ASSERT(thread->suspended);
         context.ContextFlags = GET_THREAD_CONTEXT_FLAGS;
         if (!GetThreadContext(THREAD_HANDLE(thread), &context))
           ABORT("GetThreadContext failed");