aboutsummaryrefslogtreecommitdiff
path: root/src/lj_record.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/lj_record.c')
-rw-r--r--src/lj_record.c12
1 files changed, 9 insertions, 3 deletions
diff --git a/src/lj_record.c b/src/lj_record.c
index 0e14382c..dfcc3f65 100644
--- a/src/lj_record.c
+++ b/src/lj_record.c
@@ -1254,10 +1254,16 @@ TRef lj_record_idx(jit_State *J, RecordIndex *ix)
1254 lua_assert(!hasmm); 1254 lua_assert(!hasmm);
1255 if (oldv == niltvg(J2G(J))) { /* Need to insert a new key. */ 1255 if (oldv == niltvg(J2G(J))) { /* Need to insert a new key. */
1256 TRef key = ix->key; 1256 TRef key = ix->key;
1257 if (tref_isinteger(key)) /* NEWREF needs a TValue as a key. */ 1257 if (tref_isinteger(key)) { /* NEWREF needs a TValue as a key. */
1258 key = emitir(IRTN(IR_CONV), key, IRCONV_NUM_INT); 1258 key = emitir(IRTN(IR_CONV), key, IRCONV_NUM_INT);
1259 else if (tref_isnumber(key) && tref_isk(key) && tvismzero(&ix->keyv)) 1259 } else if (tref_isnum(key)) {
1260 key = lj_ir_knum_zero(J); /* Canonicalize -0.0 to +0.0. */ 1260 if (tref_isk(key)) {
1261 if (tvismzero(&ix->keyv))
1262 key = lj_ir_knum_zero(J); /* Canonicalize -0.0 to +0.0. */
1263 } else {
1264 emitir(IRTG(IR_EQ, IRT_NUM), key, key); /* Check for !NaN. */
1265 }
1266 }
1261 xref = emitir(IRT(IR_NEWREF, IRT_P32), ix->tab, key); 1267 xref = emitir(IRT(IR_NEWREF, IRT_P32), ix->tab, key);
1262 keybarrier = 0; /* NEWREF already takes care of the key barrier. */ 1268 keybarrier = 0; /* NEWREF already takes care of the key barrier. */
1263 } 1269 }