let define_anonymous_struct ~env ~is_union newdef = 
  let id = make_new_struct_id () in
  env.struct_table <- (id, ref newdef) :: env.struct_table;
  id