Run VM events and finalizers in separate state.

Reported by Sergey Kaplun. #1403

1 files changed, 2 insertions, 0 deletions

diff --git a/src/lj_obj.h b/src/lj_obj.h
index 855727bf..73b186e2 100644
--- a/src/lj_obj.h
+++ b/src/lj_obj.h
@@ -647,6 +647,7 @@ typedef struct global_State {
   TValue tmptv, tmptv2; /* Temporary TValues. */
   Node nilnode;         /* Fallback 1-element hash part (nil key and value). */
   TValue registrytv;    /* Anchor for registry. */
+  GCRef vmthref;        /* Link to VM thread. */
   GCupval uvhead;       /* Head of double-linked list of all open upvalues. */
   int32_t hookcount;    /* Instruction hook countdown. */
   int32_t hookcstart;   /* Start count for instruction hook counter. */
@@ -663,6 +664,7 @@ typedef struct global_State {
 } global_State;
 
 #define mainthread(g)   (&gcref(g->mainthref)->th)
+#define vmthread(g)     (&gcref(g->vmthref)->th)
 #define niltv(L) \
   check_exp(tvisnil(&G(L)->nilnode.val), &G(L)->nilnode.val)
 #define niltvg(g) \