aboutsummaryrefslogtreecommitdiff
path: root/src/lj_crecord.c
diff options
context:
space:
mode:
authorMike Pall <mike>2010-12-28 19:09:01 +0100
committerMike Pall <mike>2010-12-28 19:09:01 +0100
commitd176433e3260eaba55f7211af23250b68a25fdda (patch)
treecc4919d95483bf262959463512059a8646613e95 /src/lj_crecord.c
parenta70fb9416a535146dc60b680313c8ef7fa7daaf6 (diff)
downloadluajit-d176433e3260eaba55f7211af23250b68a25fdda.tar.gz
luajit-d176433e3260eaba55f7211af23250b68a25fdda.tar.bz2
luajit-d176433e3260eaba55f7211af23250b68a25fdda.zip
FFI: Catch various NYI cases while recording.
Diffstat (limited to 'src/lj_crecord.c')
-rw-r--r--src/lj_crecord.c5
1 files changed, 3 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)
273 goto err_nyi; /* NYI: specialize to the result. */ 273 goto err_nyi; /* NYI: specialize to the result. */
274 if (t == IRT_CDATA) 274 if (t == IRT_CDATA)
275 goto err_nyi; /* NYI: copyval of >64 bit integers. */ 275 goto err_nyi; /* NYI: copyval of >64 bit integers. */
276 if ((sinfo & CTF_BOOL) || t == IRT_CDATA) 276 if (t >= IRT_U32)
277 if (t == IRT_U32) lj_trace_err(J, LJ_TRERR_NYICONV); 277 goto err_nyi; /* NYI: on-trace handling of U32/I64/U64. */
278 return emitir(IRT(IR_XLOAD, t), sp, 0); 278 return emitir(IRT(IR_XLOAD, t), sp, 0);
279 } else if (ctype_isptr(sinfo)) { 279 } else if (ctype_isptr(sinfo)) {
280 IRType t = (LJ_64 && s->size == 8) ? IRT_P64 : IRT_P32; 280 IRType t = (LJ_64 && s->size == 8) ? IRT_P64 : IRT_P32;
281 sp = emitir(IRT(IR_XLOAD, t), sp, 0); 281 sp = emitir(IRT(IR_XLOAD, t), sp, 0);
282 } else if (ctype_isrefarray(sinfo) || ctype_isstruct(sinfo)) { 282 } else if (ctype_isrefarray(sinfo) || ctype_isstruct(sinfo)) {
283 cts->L = J->L;
283 sid = lj_ctype_intern(cts, CTINFO_REF(sid), CTSIZE_PTR); /* Create ref. */ 284 sid = lj_ctype_intern(cts, CTINFO_REF(sid), CTSIZE_PTR); /* Create ref. */
284 } else if (ctype_iscomplex(sinfo)) { 285 } else if (ctype_iscomplex(sinfo)) {
285 IRType t = s->size == 2*sizeof(double) ? IRT_NUM : IRT_CDATA; 286 IRType t = s->size == 2*sizeof(double) ? IRT_NUM : IRT_CDATA;