let make_incomplete_struct_definition ~env ~is_union =
let id = make_new_struct_id () in
let def = { str_union_p = is_union; str_size = None;
str_align = None; str_fields = [] } in
env.struct_table <- (id, ref def) :: env.struct_table;
id