Lines Matching refs:vp
92 expr(Char ***vp)
94 return (exp0(vp, 0));
98 exp0(Char ***vp, int ignore)
102 p1 = exp1(vp, ignore);
104 etraci("exp0 p1", p1, vp);
106 if (**vp && eq(**vp, STRor2)) {
109 (*vp)++;
110 p2 = exp0(vp, (ignore & IGNORE) || p1);
112 etraci("exp0 p2", p2, vp);
120 exp1(Char ***vp, int ignore)
124 p1 = csh_exp2(vp, ignore);
126 etraci("exp1 p1", p1, vp);
128 if (**vp && eq(**vp, STRand2)) {
131 (*vp)++;
132 p2 = exp1(vp, (ignore & IGNORE) || !p1);
134 etraci("exp1 p2", p2, vp);
142 csh_exp2(Char ***vp, int ignore)
146 p1 = exp2a(vp, ignore);
148 etraci("exp3 p1", p1, vp);
150 if (**vp && eq(**vp, STRor)) {
153 (*vp)++;
154 p2 = csh_exp2(vp, ignore);
156 etraci("exp3 p2", p2, vp);
164 exp2a(Char ***vp, int ignore)
168 p1 = exp2b(vp, ignore);
170 etraci("exp2a p1", p1, vp);
172 if (**vp && eq(**vp, STRcaret)) {
175 (*vp)++;
176 p2 = exp2a(vp, ignore);
178 etraci("exp2a p2", p2, vp);
186 exp2b(Char ***vp, int ignore)
190 p1 = exp2c(vp, ignore);
192 etraci("exp2b p1", p1, vp);
194 if (**vp && eq(**vp, STRand)) {
197 (*vp)++;
198 p2 = exp2b(vp, ignore);
200 etraci("exp2b p2", p2, vp);
208 exp2c(Char ***vp, int ignore)
213 p1 = exp3(vp, ignore);
215 etracc("exp2c p1", p1, vp);
217 if ((i = isa(**vp, EQOP)) != 0) {
218 (*vp)++;
221 p2 = exp3(vp, ignore);
223 etracc("exp2c p2", p2, vp);
250 exp3(Char ***vp, int ignore)
255 p1 = exp3a(vp, ignore);
257 etracc("exp3 p1", p1, vp);
259 if ((i = isa(**vp, RELOP)) != 0) {
260 (*vp)++;
261 if (**vp && eq(**vp, STRequal))
262 i |= 1, (*vp)++;
263 p2 = exp3(vp, ignore);
265 etracc("exp3 p2", p2, vp);
290 exp3a(Char ***vp, int ignore)
295 p1 = exp4(vp, ignore);
297 etracc("exp3a p1", p1, vp);
299 op = **vp;
301 (*vp)++;
302 p2 = exp3a(vp, ignore);
304 etracc("exp3a p2", p2, vp);
318 exp4(Char ***vp, int ignore)
324 p1 = exp5(vp, ignore);
326 etracc("exp4 p1", p1, vp);
328 if (isa(**vp, ADDOP)) {
331 op = *(*vp)++;
332 p2 = exp4(vp, ignore);
334 etracc("exp4 p2", p2, vp);
353 exp5(Char ***vp, int ignore)
359 p1 = exp6(vp, ignore);
361 etracc("exp5 p1", p1, vp);
363 if (isa(**vp, MULOP)) {
366 op = *(*vp)++;
367 p2 = exp5(vp, ignore);
369 etracc("exp5 p2", p2, vp);
397 exp6(Char ***vp, int ignore)
403 if (**vp == 0)
405 if (eq(**vp, STRbang)) {
406 (*vp)++;
407 cp = exp6(vp, ignore);
409 etracc("exp6 ! cp", cp, vp);
415 if (eq(**vp, STRtilde)) {
416 (*vp)++;
417 cp = exp6(vp, ignore);
419 etracc("exp6 ~ cp", cp, vp);
425 if (eq(**vp, STRLparen)) {
426 (*vp)++;
427 ccode = exp0(vp, ignore);
429 etraci("exp6 () ccode", ccode, vp);
431 if (**vp == 0 || ***vp != ')')
433 (*vp)++;
436 if (eq(**vp, STRLbrace)) {
447 (*vp)++;
448 v = *vp;
450 if (!**vp)
452 if (eq(*(*vp)++, STRRbrace))
459 *--(*vp) = 0;
466 etraci("exp6 {} status", egetn(value(STRstatus)), vp);
470 if (isa(**vp, ANYOP))
472 cp = *(*vp)++;
485 if (isa(**vp, ANYOP) && stat(short2str(**vp), &stb))
488 dp = *(*vp)++;
548 etraci("exp6 -? i", i, vp);
554 etracc("exp6 default", cp, vp);
648 etraci(char *str, int i, Char ***vp)
651 blkpr(csherr, *vp);
655 etracc(char *str, Char *cp, Char ***vp)
658 blkpr(csherr, *vp);