vreopen
cnt = vreopen(p, lineno(tp), vcline);
(void) vreopen(p, lineno(tp), l);
(void) vreopen(p, lineDOT() + (l - vcline), l);
(void) vreopen(WTOP, lineDOT(), vcline);
(void) vreopen(LINE(vcline), lineDOT(), vcline);
i = vreopen(LINE(vcline), lineDOT(), vcline);