Lines Matching defs:shp

321 void	*sh_parse(Shell_t *shp, Sfio_t *iop, int flag)
324 Lex_t *lexp = (Lex_t*)shp->lex_context;
327 int sav_prompt = shp->nextprompt;
328 if(shp->binscript && (sffileno(iop)==shp->infd || (flag&SH_FUNEVAL)))
329 return((void*)sh_trestore(shp,iop));
331 shp->st.staklist = 0;
333 lexp->inlineno = shp->inlineno;
334 lexp->firstline = shp->st.firstline;
335 shp->nextprompt = 1;
342 sh_lexopen(lexp,shp,0);
358 if(sffileno(iop)==shp->infd || (flag&SH_FUNEVAL))
359 shp->binscript = 1;
361 return((void*)sh_trestore(shp,iop));
365 if((flag&SH_NL) && (shp->inlineno=error_info.line+shp->st.firstline)==0)
366 shp->inlineno=1;
368 shp->nextprompt = 2;
381 shp->nextprompt = sav_prompt;
384 shp->st.firstline = lexp->firstline;
385 shp->inlineno = lexp->inlineno;
387 stkseek(shp->stk,0);
440 void sh_freeup(Shell_t *shp)
442 if(shp->st.staklist)
443 sh_funstaks(shp->st.staklist,-1);
444 shp->st.staklist = 0;
717 Shell_t *shp = lexp->sh;
732 void *in_mktype = shp->mktype;
733 shp->mktype = 0;
736 t->funct.functline = shp->inlineno;
750 if(!shp->st.filename || sffileno(iop)<0)
754 if(sh_isstate(SH_HISTORY) && shp->hist_ptr)
755 t->funct.functloc = sfseek(shp->hist_ptr->histfp,(off_t)0,SEEK_CUR);
806 slp->slnext = shp->st.staklist;
807 shp->st.staklist = 0;
817 if(shp->st.filename)
818 fp->functnam = stakcopy(shp->st.filename);
832 else if(shp->shcomp)
841 slp->slchild = shp->st.staklist;
850 shp->st.staklist = slp->slnext;
853 siglongjmp(*shp->jmplist,jmpval);
855 shp->st.staklist = (struct slnod*)slp;
859 shp->mktype = in_mktype;
868 kiaentity(lexp,t->funct.functnam,-1,'p',t->funct.functline,shp->inlineno-1,lexp->current,'p',0,"");