184 expr(Char ***vp)  in expr()  argument
186     return (exp0(vp, 0));  in expr()
190 exp0(Char ***vp, int ignore)  in exp0()  argument
192     tcsh_number_t p1 = exp1(vp, ignore);  in exp0()
194     etraci("exp0 p1", p1, vp);  in exp0()
195     while (**vp && eq(**vp, STRor2)) {  in exp0()
198 	(*vp)++;  in exp0()
201 	    exp0(vp, (ignore & TEXP_IGNORE) || p1) :  in exp0()
202 	    exp1(vp, (ignore & TEXP_IGNORE) || p1);  in exp0()
205 	etraci("exp0 p1", p1, vp);  in exp0()
213 exp1(Char ***vp, int ignore)  in exp1()  argument
215     tcsh_number_t p1 = exp2x(vp, ignore);  in exp1()
217     etraci("exp1 p1", p1, vp);  in exp1()
218     while (**vp && eq(**vp, STRand2)) {  in exp1()
221 	(*vp)++;  in exp1()
223 	    exp1(vp, (ignore & TEXP_IGNORE) || !p1) :  in exp1()
224 	    exp2x(vp, (ignore & TEXP_IGNORE) || !p1);  in exp1()
226 	etraci("exp1 p2", p2, vp);  in exp1()
229 	etraci("exp1 p1", p1, vp);  in exp1()
237 exp2x(Char ***vp, int ignore)  in exp2x()  argument
239     tcsh_number_t p1 = exp2a(vp, ignore);  in exp2x()
241     etraci("exp2x p1", p1, vp);  in exp2x()
242     while (**vp && eq(**vp, STRor)) {  in exp2x()
245 	(*vp)++;  in exp2x()
247 	    exp2x(vp, ignore) :  in exp2x()
248 	    exp2a(vp, ignore);  in exp2x()
249 	etraci("exp2x p2", p2, vp);  in exp2x()
252 	etraci("exp2x p1", p1, vp);  in exp2x()
260 exp2a(Char ***vp, int ignore)  in exp2a()  argument
262     tcsh_number_t p1 = exp2b(vp, ignore);  in exp2a()
264     etraci("exp2a p1", p1, vp);  in exp2a()
265     while (**vp && eq(**vp, STRcaret)) {  in exp2a()
268 	(*vp)++;  in exp2a()
270 	    exp2a(vp, ignore) :  in exp2a()
271 	    exp2b(vp, ignore);  in exp2a()
272 	etraci("exp2a p2", p2, vp);  in exp2a()
275 	etraci("exp2a p1", p1, vp);  in exp2a()
283 exp2b(Char ***vp, int ignore)  in exp2b()  argument
285     tcsh_number_t p1 = exp2c(vp, ignore);  in exp2b()
287     etraci("exp2b p1", p1, vp);  in exp2b()
288     while (**vp && eq(**vp, STRand)) {  in exp2b()
291 	(*vp)++;  in exp2b()
293 	    exp2b(vp, ignore) :  in exp2b()
294 	    exp2c(vp, ignore);  in exp2b()
295 	etraci("exp2b p2", p2, vp);  in exp2b()
298 	etraci("exp2b p1", p1, vp);  in exp2b()
306 exp2c(Char ***vp, int ignore)  in exp2c()  argument
308     Char *p1 = exp3(vp, ignore);  in exp2c()
313     etracc("exp2c p1", p1, vp);  in exp2c()
314     if ((i = isa(**vp, EQOP)) != 0) {  in exp2c()
315 	(*vp)++;  in exp2c()
318 	p2 = exp3(vp, ignore);  in exp2c()
320 	etracc("exp2c p2", p2, vp);  in exp2c()
349 exp3(Char ***vp, int ignore)  in exp3()  argument
354     p1 = exp3a(vp, ignore);  in exp3()
355     etracc("exp3 p1", p1, vp);  in exp3()
356     while ((i = isa(**vp, RELOP)) != 0) {  in exp3()
357 	(*vp)++;  in exp3()
358 	if (**vp && eq(**vp, STRequal))  in exp3()
359 	    i |= 1, (*vp)++;  in exp3()
362 	    exp3(vp, ignore) :  in exp3()
363 	    exp3a(vp, ignore);  in exp3()
365 	etracc("exp3 p2", p2, vp);  in exp3()
387 	etracc("exp3 p1", p1, vp);  in exp3()
395 exp3a(Char ***vp, int ignore)  in exp3a()  argument
401     p1 = exp4(vp, ignore);  in exp3a()
402     etracc("exp3a p1", p1, vp);  in exp3a()
403     op = **vp;  in exp3a()
405 	(*vp)++;  in exp3a()
408 	    exp3a(vp, ignore) :  in exp3a()
409 	    exp4(vp, ignore);  in exp3a()
411 	etracc("exp3a p2", p2, vp);  in exp3a()
418 	etracc("exp3a p1", p1, vp);  in exp3a()
424 exp4(Char ***vp, int ignore)  in exp4()  argument
429     p1 = exp5(vp, ignore);  in exp4()
430     etracc("exp4 p1", p1, vp);  in exp4()
431     while (isa(**vp, ADDOP)) {  in exp4()
432 	const Char *op = *(*vp)++;  in exp4()
436 	    exp4(vp, ignore) :  in exp4()
437 	    exp5(vp, ignore);  in exp4()
439 	etracc("exp4 p2", p2, vp);  in exp4()
453 	etracc("exp4 p1", p1, vp);  in exp4()
461 exp5(Char ***vp, int ignore)  in exp5()  argument
466     p1 = exp6(vp, ignore);  in exp5()
467     etracc("exp5 p1", p1, vp);  in exp5()
469     while (isa(**vp, MULOP)) {  in exp5()
470 	const Char *op = *(*vp)++;  in exp5()
482 	    exp5(vp, ignore) :  in exp5()
483 	    exp6(vp, ignore);  in exp5()
485 	etracc("exp5 p2", p2, vp);  in exp5()
509 	etracc("exp5 p1", p1, vp);  in exp5()
517 exp6(Char ***vp, int ignore)  in exp6()  argument
523     if (**vp == 0)  in exp6()
525     if (eq(**vp, STRbang)) {  in exp6()
526 	(*vp)++;  in exp6()
527 	cp = exp6(vp, ignore);  in exp6()
529 	etracc("exp6 ! cp", cp, vp);  in exp6()
534     if (eq(**vp, STRtilde)) {  in exp6()
535 	(*vp)++;  in exp6()
536 	cp = exp6(vp, ignore);  in exp6()
538 	etracc("exp6 ~ cp", cp, vp);  in exp6()
543     if (eq(**vp, STRLparen)) {  in exp6()
544 	(*vp)++;  in exp6()
545 	ccode = exp0(vp, ignore);  in exp6()
546 	etraci("exp6 () ccode", ccode, vp);  in exp6()
547 	if (**vp == 0 || ***vp != ')')  in exp6()
549 	(*vp)++;  in exp6()
552     if (eq(**vp, STRLbrace)) {  in exp6()
563 	(*vp)++;  in exp6()
564 	v = *vp;  in exp6()
566 	    if (!**vp)  in exp6()
568 	    if (eq(*(*vp)++, STRRbrace))  in exp6()
576 	    *--(*vp) = 0;  in exp6()
582 	etraci("exp6 {} status", egetn(varval(STRstatus)), vp);  in exp6()
585     if (isa(**vp, ANYOP))  in exp6()
587     cp = *(*vp)++;  in exp6()
595         return(filetest(cp, vp, ignore));  in exp6()
596     etracc("exp6 default", cp, vp);  in exp6()
606 filetest(Char *cp, Char ***vp, int ignore)  in filetest()  argument
674     if (isa(**vp, ANYOP) && TCSH_STAT(short2str(**vp), &stb))  in filetest()
677     dp = *(*vp)++;  in filetest()
939     etraci("exp6 -? i", i, vp);  in filetest()
1036 etraci(const char *str, tcsh_number_t i, Char ***vp)  in etraci()  argument
1043     blkpr(*vp);  in etraci()
1047 etracc(const char *str, const Char *cp, Char ***vp)  in etracc()  argument
1050     blkpr(*vp);  in etracc()