setfname
VAR { setfname($1); }
| CALL { setfname($1); }
static void setfname(Cell *);
setfname("-");
setfname(argv[0]);
setfname(argv[0]);
extern void setfname(char *);
setfname(wstr2str(ap[1], 0));