d0p1/ack
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Fixed bug with union initializers

Browse source
This commit is contained in:
ceriel 1993-08-09 09:40:44 +00:00
parent 18967fad9a
commit b3863b7247
1 changed files with 4 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lang/cem/cemcom.ansi/ival.g
View file

@ -188,7 +188,7 @@ arr_elem(tpp, p)
p->nelem = 1; p->nelem = 1;
return tpp; return tpp;
} }
if (AHEAD == '{' || ! aggregate_type(tp->tp_up)) if (AHEAD == '{' || (! aggregate_type(tp->tp_up) && tp->tp_up->tp_fund != UNION))
return &(tp->tp_up); return &(tp->tp_up);
return gen_tphead(&(tp->tp_up), 1); return gen_tphead(&(tp->tp_up), 1);
} }
@ -219,6 +219,9 @@ gen_tphead(tpp, nest)
return 0; return 0;
} }
if (gen_error) return tpp; if (gen_error) return tpp;
if (tp->tp_fund == UNION) {
return gen_tphead(&(tp->tp_sdef->sd_type), nest);
}
p = new_e_stack(); p = new_e_stack();
p->next = p_stack; p->next = p_stack;
p_stack = p; p_stack = p;