From a5b1c4d98eeb97a950774ae032f51f820dfbfc4c Mon Sep 17 00:00:00 2001
From: Mike Pall <mike>
Date: Fri, 17 Jul 2015 23:14:21 +0200
Subject: [PATCH] FFI: Don't propagate qualifiers into subtypes of complex.

---
 src/lj_cparse.c | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/src/lj_cparse.c b/src/lj_cparse.c
index b9df88d7..9e213610 100644
--- 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. */