asx
asx(vp, subscr, retp);
void asx(tchar *, int, tchar *);
asx(vp, subscr, p);
asx(vp, subscr, operate(op, gv->vec[subscr - 1], p));
asx(vp, subscr, operate(op, getvx(vp, subscr)->vec[subscr - 1], p));