REFER
if ((res == REFER) && ((v < 0) || (v >= numpri))) {
if ((res == REFER) && (ref == v)) {
while (pri->res == REFER) {
set_pri(currchar->ref[i], ref, REFER);
set_pri(currelem->ref[i], ref, REFER);
set_pri(pri_undefined[i], ref, REFER);
set_pri(currundef->ref[i], ref, REFER);
set_pri(cc->ref[i], ref, REFER);
case REFER: