-#if 0
-int get_union_n_types (type *uni) {
- assert(uni && (uni->type_op == type_union));
- return uni->attr.ua.n_types;
-}
-type *get_union_unioned_type (type *uni, int pos) {
- assert(uni && (uni->type_op == type_union));
- assert(pos >= 0 && pos < get_union_n_types(uni));
- return uni->attr.ua.unioned_type[pos] = skip_tid(uni->attr.ua.unioned_type[pos]);
-}
-void set_union_unioned_type (type *uni, int pos, type *tp) {
- assert(uni && (uni->type_op == type_union));
- assert(pos >= 0 && pos < get_union_n_types(uni));
- uni->attr.ua.unioned_type[pos] = tp;
-}
-ident *get_union_delim_nameid (type *uni, int pos) {
- assert(uni && (uni->type_op == type_union));
- assert(pos >= 0 && pos < get_union_n_types(uni));
- return uni->attr.ua.delim_names[pos];
-}
-const char *get_union_delim_name (type *uni, int pos) {
- assert(uni && (uni->type_op == type_union));
- assert(pos >= 0 && pos < get_union_n_types(uni));
- return get_id_str(uni->attr.ua.delim_names[pos]);
-}
-void set_union_delim_nameid (type *uni, int pos, ident *id) {
- assert(uni && (uni->type_op == type_union));
- assert(pos >= 0 && pos < get_union_n_types(uni));
- uni->attr.ua.delim_names[pos] = id;
-}
-#endif
-int get_union_n_members (const type *uni) {