Lines Matching refs:ap

104 	Arg_t *ap = (Arg_t*)addr;
105 ap->sh = shp;
142 register Arg_t *ap = (Arg_t*)(shp->arg_context);
150 newflags=ap->sh->options;
167 np = nv_open(opt_info.arg,ap->sh->var_tree,NV_NOASSIGN|NV_ARRAY|NV_VARNAME);
206 ap->sh->rcfile = opt_info.arg;
225 np = nv_open("BASH_VERSION",ap->sh->var_tree,0);
227 np = nv_open("MACHTYPE",ap->sh->var_tree,0);
247 ap->sh->test |= opt_info.num;
249 ap->sh->test = 0;
264 ap->kiafile = opt_info.arg;
301 off_option(&ap->sh->offoptions,o);
309 on_option(&ap->sh->offoptions,o);
336 strsort(ap->sh->st.dolv+1,ap->sh->st.dolc,strcoll);
344 sh_argset(ap,argv-1);
348 if(!(ap->sh->comdiv = *argv++))
358 sh_applyopts(ap->sh,newflags);
360 if(ap->kiafile)
364 if(!(lp->kiafile=sfopen(NIL(Sfio_t*),ap->kiafile,"w+")))
365 errormsg(SH_DICT,ERROR_system(3),e_create,ap->kiafile);
377 ap->kiafile = 0;
446 register Arg_t *ap = (Arg_t*)context;
448 register char *flagp=ap->flagadr;
457 return(ap->flagadr);
463 static void sh_argset(Arg_t *ap,char *argv[])
465 sh_argfree(ap->sh,ap->dolh,0);
466 ap->dolh = sh_argcreate(argv);
468 ap->dolh->dolnxt = ap->argfor;
469 ap->argfor = ap->dolh;
470 ap->sh->st.dolc = ap->dolh->dolnum-1;
471 ap->sh->st.dolv = ap->dolh->dolval;
485 register Arg_t *ap = (Arg_t*)shp->arg_context;
491 if(flag && argblk==ap->dolh)
492 ap->dolh->dolrefcnt = 1;
496 if(ap->argfor == argblk)
497 ap->argfor = argblk->dolnxt;
500 for(argr=ap->argfor;argr;argr=argr->dolnxt)
548 register Arg_t *ap = (Arg_t*)shp->arg_context;
549 register struct dolnod *olddolh = ap->dolh;
550 *savargfor = ap->argfor;
551 ap->dolh = 0;
552 ap->argfor = 0;
553 sh_argset(ap,argi);
562 register Arg_t *ap = (Arg_t*)shp->arg_context;
563 while(ap->argfor=sh_argfree(shp,ap->argfor,0));
564 ap->argfor = afor;
565 if(ap->dolh = blk)
567 shp->st.dolc = ap->dolh->dolnum-1;
568 shp->st.dolv = ap->dolh->dolval;
578 register Arg_t *ap = (Arg_t*)shp->arg_context;
579 if(dh=ap->dolh)
715 register struct dolnod *ap = (struct dolnod*)ac->comarg;
716 *nargs = ap->dolnum;
717 return(ap->dolval+ap->dolbot);
736 argp = argp->argnxt.ap;
760 struct argnod *nextarg = argp->argchn.ap;
761 argp->argchn.ap = 0;
800 register struct argnod *ap;
803 ap = (struct argnod*)stkseek(shp->stk,ARGVAL);
804 ap->argflag |= ARG_MAKE;
805 ap->argflag &= ~ARG_RAW;
810 ap = (struct argnod*)stkfreeze(shp->stk,0);
818 sh_exec((Shnode_t*)argp->argchn.ap,(int)sh_isstate(SH_ERREXIT));
823 sh_exec((Shnode_t*)argp->argchn.ap,(int)sh_isstate(SH_ERREXIT));
830 return(ap);
841 struct argnod *ap;
842 ap = sh_argprocsub(shp,argp);
843 ap->argchn.ap = *argchain;
844 *argchain = ap;
852 struct argnod *ap;
855 argp->argchn.ap=0;
856 if(ap=argp->argchn.ap)
860 ap->argchn.ap = *argchain;
861 ap->argflag |= ARG_RAW;
862 ap->argflag &= ~ARG_EXP;
863 *argchain = ap;
871 argp->argchn.ap = *argchain;