From 921db33a9a89f83b0c38c5db409a2e653582f11e Mon Sep 17 00:00:00 2001
From: Nicolas Noble <nicolasnoble@users.noreply.github.com>
Date: Mon, 5 Jun 2023 06:35:42 -0700
Subject: [PATCH] Ensure proper JIT execution context on C callbacks

---
 src/lj_ccallback.c | 1 +
 1 file changed, 1 insertion(+)

diff --git a/src/lj_ccallback.c b/src/lj_ccallback.c
index 43e44305..4c758a4d 100644
--- a/src/lj_ccallback.c
+++ b/src/lj_ccallback.c
@@ -681,6 +681,7 @@ lua_State * LJ_FASTCALL lj_ccallback_enter(CTState *cts, void *cf)
   lua_State *L = cts->L;
   global_State *g = cts->g;
   lj_assertG(L != NULL, "uninitialized cts->L in callback");
+  setgcref(g->cur_L, obj2gco(L));
   if (tvref(g->jit_base)) {
     setstrV(L, L->top++, lj_err_str(L, LJ_ERR_FFI_BADCBACK));
     if (g->panic) g->panic(L);