arrayname
vp = global(arrayname(sp));
char * arrayname(const char *);
vpbase = (vp->flag & ARRAY) ? global(arrayname(tvar)) : vp;