Lines Matching refs:ap
507 register Cell *x, *ap, *k;
513 ap = execute(a[1]); /* array name */
514 if (!isarr(ap))
515 ERROR "%s is not an array", ap->nval FATAL;
535 k = lookup(buf, (Array *)ap->sval);
536 tempfree(ap, "");
1206 Cell *x, *y, *ap;
1224 ap = execute(a[1]); /* array name */
1225 freesymtab(ap);
1226 dprintf(("split: s=|%s|, a=%s, sep=|%s|\n", s, ap->nval, fs));
1227 ap->tval &= ~STR;
1228 ap->tval |= ARR;
1229 ap->sval = (uchar *)makesymtab(NSYMTAB);
1252 STR|NUM, (Array *)ap->sval);
1256 STR, (Array *)ap->sval);
1265 STR, (Array *)ap->sval);
1276 STR|NUM, (Array *)ap->sval);
1279 (void) setsymtab(num, s, 0.0, STR, (Array *)ap->sval);
1302 STR|NUM, (Array *)ap->sval);
1306 STR, (Array *)ap->sval);
1324 STR|NUM, (Array *)ap->sval);
1328 STR, (Array *)ap->sval);
1335 tempfree(ap, "");