FFI: Don't propagate qualifiers into subtypes of complex.

diff --git a/src/lj_cparse.c b/src/lj_cparse.c
index b9df88d7702143260659d1677b2050afe7e3f10f..9e213610d03767af511c6596b653edfef130a564 100644 (file)
--- a/src/lj_cparse.c
+++ b/src/lj_cparse.c
@@ -798,6 +798,10 @@ static void cp_push_type(CPDecl *decl, CTypeID id)
     cp_push(decl, info & ~CTMASK_CID, size);  /* Copy type. */
     break;
   case CT_ARRAY:
+    if ((ct->info & (CTF_VECTOR|CTF_COMPLEX))) {
+      info |= (decl->attr & CTF_QUAL);
+      decl->attr &= ~CTF_QUAL;
+    }
     cp_push_type(decl, ctype_cid(info));  /* Unroll. */
     cp_push(decl, info & ~CTMASK_CID, size);  /* Copy type. */
     decl->stack[decl->pos].sib = 1;  /* Mark as already checked and sized. */