X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/dc0502853eaa4689351eeccc4becf89ec85060e0..2d63e3e140948d3d027cbbf76f121ae5d9c2fa6f:/thread.h?ds=sidebyside

diff --git a/thread.h b/thread.h
index dbfb56b..2b8e6369 100644
--- a/thread.h
+++ b/thread.h
@@ -204,7 +204,7 @@ struct thread {
     U8		Tlocalizing;
     COP *	Tcurcop;
 
-    CONTEXT *	Tcxstack;
+    PERL_CONTEXT *	Tcxstack;
     I32		Tcxstack_ix;
     I32		Tcxstack_max;
 
@@ -242,10 +242,10 @@ typedef struct thread *Thread;
 #define THRf_ZOMBIE	3
 #define THRf_DEAD	4
 
-#define THRf_DIE_FATAL	8
+#define THRf_DID_DIE	8
 
 /* ThrSTATE(t) and ThrSETSTATE(t) must only be called while holding t->mutex */
-#define ThrSTATE(t) ((t)->flags)
+#define ThrSTATE(t) ((t)->flags & THRf_STATE_MASK)
 #define ThrSETSTATE(t, s) STMT_START {		\
 	(t)->flags &= ~THRf_STATE_MASK;		\
 	(t)->flags |= (s);			\