From 45c067ddddaae1bedc3e07b6f5af65aea3beceac Mon Sep 17 00:00:00 2001
From: Mike Pall <mike>
Date: Sun, 19 Jan 2014 13:09:20 +0100
Subject: [PATCH] FFI: Fix cts->L for cdata unsinking in snapshot restore.

---
 src/lj_snap.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/lj_snap.c b/src/lj_snap.c
index 4d211898..1c978c26 100644
--- a/src/lj_snap.c
+++ b/src/lj_snap.c
@@ -708,7 +708,7 @@ static void snap_unsink(jit_State *J, GCtrace *T, ExitState *ex,
 	     ir->o == IR_CNEW || ir->o == IR_CNEWI);
 #if LJ_HASFFI
   if (ir->o == IR_CNEW || ir->o == IR_CNEWI) {
-    CTState *cts = ctype_ctsG(J2G(J));
+    CTState *cts = ctype_cts(J->L);
     CTypeID id = (CTypeID)T->ir[ir->op1].i;
     CTSize sz = lj_ctype_size(cts, id);
     GCcdata *cd = lj_cdata_new(cts, id, sz);