From d176433e3260eaba55f7211af23250b68a25fdda Mon Sep 17 00:00:00 2001
From: Mike Pall <mike>
Date: Tue, 28 Dec 2010 19:09:01 +0100
Subject: [PATCH] FFI: Catch various NYI cases while recording.

---
 src/lj_crecord.c  | 5 +++--
 src/lj_ffrecord.c | 4 ++++
 2 files changed, 7 insertions(+), 2 deletions(-)

diff --git a/src/lj_crecord.c b/src/lj_crecord.c
index 50fca4cc..326ff6de 100644
--- a/src/lj_crecord.c
+++ b/src/lj_crecord.c
@@ -273,13 +273,14 @@ static TRef crec_tv_ct(jit_State *J, CType *s, CTypeID sid, TRef sp)
       goto err_nyi;  /* NYI: specialize to the result. */
     if (t == IRT_CDATA)
       goto err_nyi;  /* NYI: copyval of >64 bit integers. */
-    if ((sinfo & CTF_BOOL) || t == IRT_CDATA)
-    if (t == IRT_U32) lj_trace_err(J, LJ_TRERR_NYICONV);
+    if (t >= IRT_U32)
+      goto err_nyi;  /* NYI: on-trace handling of U32/I64/U64. */
     return emitir(IRT(IR_XLOAD, t), sp, 0);
   } else if (ctype_isptr(sinfo)) {
     IRType t = (LJ_64 && s->size == 8) ? IRT_P64 : IRT_P32;
     sp = emitir(IRT(IR_XLOAD, t), sp, 0);
   } else if (ctype_isrefarray(sinfo) || ctype_isstruct(sinfo)) {
+    cts->L = J->L;
     sid = lj_ctype_intern(cts, CTINFO_REF(sid), CTSIZE_PTR);  /* Create ref. */
   } else if (ctype_iscomplex(sinfo)) {
     IRType t = s->size == 2*sizeof(double) ? IRT_NUM : IRT_CDATA;
diff --git a/src/lj_ffrecord.c b/src/lj_ffrecord.c
index b7ee06cd..ca9f6ceb 100644
--- a/src/lj_ffrecord.c
+++ b/src/lj_ffrecord.c
@@ -266,6 +266,10 @@ static void LJ_FASTCALL recff_tonumber(jit_State *J, RecordFFData *rd)
 	recff_nyiu(J);  /* Would need an inverted STRTO for this case. */
       tr = emitir(IRTG(IR_STRTO, IRT_NUM), tr, 0);
     }
+#if LJ_HASFFI
+  } else if (tref_iscdata(tr)) {
+    recff_nyiu(J);
+#endif
   } else {
     tr = TREF_NIL;
   }