FFI: Change priority of table initializer variants for structs.

1 files changed, 3 insertions, 2 deletions

diff --git a/src/lj_cconv.c b/src/lj_cconv.c
index b81b4e90..7b32e35d 100644
--- a/src/lj_cconv.c
+++ b/src/lj_cconv.c
@@ -493,17 +493,19 @@ static void cconv_substruct_tab(CTState *cts, CType *d, uint8_t *dp,
     id = df->sib;
     if (ctype_isfield(df->info) || ctype_isbitfield(df->info)) {
       TValue *tv;
-      int32_t i = *ip;
+      int32_t i = *ip, iz = i;
       if (!gcref(df->name)) continue;  /* Ignore unnamed fields. */
       if (i >= 0) {
       retry:
         tv = (TValue *)lj_tab_getint(t, i);
         if (!tv || tvisnil(tv)) {
           if (i == 0) { i = 1; goto retry; }  /* 1-based tables. */
+          if (iz == 0) { *ip = i = -1; goto tryname; }  /* Init named fields. */
           break;  /* Stop at first nil. */
         }
         *ip = i + 1;
       } else {
+      tryname:
         tv = (TValue *)lj_tab_getstr(t, gco2str(gcref(df->name)));
         if (!tv || tvisnil(tv)) continue;
       }
@@ -524,7 +526,6 @@ static void cconv_struct_tab(CTState *cts, CType *d,
 {
   int32_t i = 0;
   memset(dp, 0, d->size);  /* Much simpler to clear the struct first. */
-  if (t->hmask) i = -1; else if (t->asize == 0) return;  /* Fast exit. */
   cconv_substruct_tab(cts, d, dp, t, &i, flags);
 }