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

bug fix: casts of constants to a set type caused memory fault

Browse source
This commit is contained in:
ceriel 1990-01-18 10:12:38 +00:00
parent 7913b6800a
commit bcf2aa511c
1 changed files with 7 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
lang/m2/comp/chk_expr.c
View file

@ -1415,6 +1415,13 @@ ChkCast(expp)
if (arg->nd_class == Value) { if (arg->nd_class == Value) {
*expp = *arg; *expp = *arg;
free_node(arg); free_node(arg);
if (lefttype->tp_fund == T_SET) {
/* User deserves what he gets here ... */
arith val = expp->nd_INT;
expp->nd_set = MkSet((unsigned)(lefttype->tp_size));
expp->nd_set[0] = val;
}
} }
else { else {
expp->nd_symb = CAST; expp->nd_symb = CAST;