static links are not considered read-only anymore
This commit is contained in:
parent
ac92184766
commit
75e36d3a38
@ -210,8 +210,11 @@ entity_p getentity(lnp, l_out)
|
|||||||
break;
|
break;
|
||||||
case ENALOCBASE:
|
case ENALOCBASE:
|
||||||
case ENAARGBASE:
|
case ENAARGBASE:
|
||||||
en.en_static = TRUE;
|
|
||||||
en.en_levels = off_set(lnp);
|
en.en_levels = off_set(lnp);
|
||||||
|
if (en.en_levels == 0) {
|
||||||
|
/* otherwise the program could change it */
|
||||||
|
en.en_static = TRUE;
|
||||||
|
}
|
||||||
break;
|
break;
|
||||||
case ENPROC:
|
case ENPROC:
|
||||||
en.en_pro = PROC(lnp);
|
en.en_pro = PROC(lnp);
|
||||||
|
|||||||
@ -224,6 +224,12 @@ STATIC kill_local(enp, indir)
|
|||||||
}
|
}
|
||||||
}
|
}
|
||||||
break;
|
break;
|
||||||
|
case ENALOCBASE:
|
||||||
|
case ENAARGBASE:
|
||||||
|
if (enp->en_loc == 0 && rep->en_levels >= 1) {
|
||||||
|
rep->en_vn = newvalnum();
|
||||||
|
}
|
||||||
|
break;
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|||||||
Loading…
x
Reference in New Issue
Block a user