diff options
-rw-r--r-- | ffi.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -3791,6 +3791,8 @@ static val make_ffi_type_struct(val syntax, val lisp_type, sethash(ffi_struct_tag_hash, cadr(syntax), obj); + tft->memb = memb; + for (i = 0; i < nmemb; i++) { val slot_syntax = pop(&slot_exprs); val slot = car(slot_syntax); @@ -3894,8 +3896,6 @@ static val make_ffi_type_struct(val syntax, val lisp_type, tft->by_value_in = 1; } - tft->memb = memb; - if (bit_offs > 0) { bug_unless (bit_offs < 8); offs++; |