diff options
Diffstat (limited to 'bin/csh/exp.c')
-rw-r--r-- | bin/csh/exp.c | 102 |
1 files changed, 1 insertions, 101 deletions
diff --git a/bin/csh/exp.c b/bin/csh/exp.c index e36f05d45b4..e271529ebfb 100644 --- a/bin/csh/exp.c +++ b/bin/csh/exp.c @@ -1,4 +1,4 @@ -/* $OpenBSD: exp.c,v 1.13 2015/10/26 15:01:15 naddy Exp $ */ +/* $OpenBSD: exp.c,v 1.14 2015/10/26 21:57:42 naddy Exp $ */ /* $NetBSD: exp.c,v 1.6 1995/03/21 09:02:51 cgd Exp $ */ /*- @@ -71,11 +71,6 @@ static void evalav(Char **); static int isa(Char *, int); static int egetn(Char *); -#ifdef EDEBUG -static void etracc(char *, Char *, Char ***); -static void etraci(char *, int, Char ***); -#endif - int expr(Char ***vp) { @@ -87,17 +82,11 @@ exp0(Char ***vp, bool ignore) { int p1 = exp1(vp, ignore); -#ifdef EDEBUG - etraci("exp0 p1", p1, vp); -#endif if (**vp && eq(**vp, STRor2)) { int p2; (*vp)++; p2 = exp0(vp, (ignore & IGNORE) || p1); -#ifdef EDEBUG - etraci("exp0 p2", p2, vp); -#endif return (p1 || p2); } return (p1); @@ -108,17 +97,11 @@ exp1(Char ***vp, bool ignore) { int p1 = exp2_(vp, ignore); -#ifdef EDEBUG - etraci("exp1 p1", p1, vp); -#endif if (**vp && eq(**vp, STRand2)) { int p2; (*vp)++; p2 = exp1(vp, (ignore & IGNORE) || !p1); -#ifdef EDEBUG - etraci("exp1 p2", p2, vp); -#endif return (p1 && p2); } return (p1); @@ -129,17 +112,11 @@ exp2_(Char ***vp, bool ignore) { int p1 = exp2a(vp, ignore); -#ifdef EDEBUG - etraci("exp3 p1", p1, vp); -#endif if (**vp && eq(**vp, STRor)) { int p2; (*vp)++; p2 = exp2_(vp, ignore); -#ifdef EDEBUG - etraci("exp3 p2", p2, vp); -#endif return (p1 | p2); } return (p1); @@ -150,17 +127,11 @@ exp2a(Char ***vp, bool ignore) { int p1 = exp2b(vp, ignore); -#ifdef EDEBUG - etraci("exp2a p1", p1, vp); -#endif if (**vp && eq(**vp, STRcaret)) { int p2; (*vp)++; p2 = exp2a(vp, ignore); -#ifdef EDEBUG - etraci("exp2a p2", p2, vp); -#endif return (p1 ^ p2); } return (p1); @@ -171,17 +142,11 @@ exp2b(Char ***vp, bool ignore) { int p1 = exp2c(vp, ignore); -#ifdef EDEBUG - etraci("exp2b p1", p1, vp); -#endif if (**vp && eq(**vp, STRand)) { int p2; (*vp)++; p2 = exp2b(vp, ignore); -#ifdef EDEBUG - etraci("exp2b p2", p2, vp); -#endif return (p1 & p2); } return (p1); @@ -194,17 +159,11 @@ exp2c(Char ***vp, bool ignore) Char *p2; int i; -#ifdef EDEBUG - etracc("exp2c p1", p1, vp); -#endif if ((i = isa(**vp, EQOP)) != 0) { (*vp)++; if (i == EQMATCH || i == NOTEQMATCH) ignore |= NOGLOB; p2 = exp3(vp, ignore); -#ifdef EDEBUG - etracc("exp2c p2", p2, vp); -#endif if (!(ignore & IGNORE)) switch (i) { @@ -240,17 +199,11 @@ exp3(Char ***vp, bool ignore) int i; p1 = exp3a(vp, ignore); -#ifdef EDEBUG - etracc("exp3 p1", p1, vp); -#endif if ((i = isa(**vp, RELOP)) != 0) { (*vp)++; if (**vp && eq(**vp, STRequal)) i |= 1, (*vp)++; p2 = exp3(vp, ignore); -#ifdef EDEBUG - etracc("exp3 p2", p2, vp); -#endif if (!(ignore & IGNORE)) switch (i) { @@ -284,16 +237,10 @@ exp3a(Char ***vp, bool ignore) int i; p1 = exp4(vp, ignore); -#ifdef EDEBUG - etracc("exp3a p1", p1, vp); -#endif op = **vp; if (op && any("<>", op[0]) && op[0] == op[1]) { (*vp)++; p2 = exp3a(vp, ignore); -#ifdef EDEBUG - etracc("exp3a p2", p2, vp); -#endif if (op[0] == '<') i = egetn(p1) << egetn(p2); else @@ -312,16 +259,10 @@ exp4(Char ***vp, bool ignore) int i = 0; p1 = exp5(vp, ignore); -#ifdef EDEBUG - etracc("exp4 p1", p1, vp); -#endif if (isa(**vp, ADDOP)) { Char *op = *(*vp)++; p2 = exp4(vp, ignore); -#ifdef EDEBUG - etracc("exp4 p2", p2, vp); -#endif if (!(ignore & IGNORE)) switch (op[0]) { @@ -347,16 +288,10 @@ exp5(Char ***vp, bool ignore) int i = 0, l; p1 = exp6(vp, ignore); -#ifdef EDEBUG - etracc("exp5 p1", p1, vp); -#endif if (isa(**vp, MULOP)) { Char *op = *(*vp)++; p2 = exp5(vp, ignore); -#ifdef EDEBUG - etracc("exp5 p2", p2, vp); -#endif if (!(ignore & IGNORE)) switch (op[0]) { @@ -404,9 +339,6 @@ exp6(Char ***vp, bool ignore) if (eq(**vp, STRbang)) { (*vp)++; cp = exp6(vp, ignore); -#ifdef EDEBUG - etracc("exp6 ! cp", cp, vp); -#endif i = egetn(cp); xfree(cp); return (putn(!i)); @@ -414,9 +346,6 @@ exp6(Char ***vp, bool ignore) if (eq(**vp, STRtilde)) { (*vp)++; cp = exp6(vp, ignore); -#ifdef EDEBUG - etracc("exp6 ~ cp", cp, vp); -#endif i = egetn(cp); xfree(cp); return (putn(~i)); @@ -424,9 +353,6 @@ exp6(Char ***vp, bool ignore) if (eq(**vp, STRLparen)) { (*vp)++; ccode = exp0(vp, ignore); -#ifdef EDEBUG - etraci("exp6 () ccode", ccode, vp); -#endif if (*vp == 0 || **vp == 0 || ***vp != ')') stderror(ERR_NAME | ERR_EXPRESSION); (*vp)++; @@ -461,9 +387,6 @@ exp6(Char ***vp, bool ignore) } pwait(); prestjob(); -#ifdef EDEBUG - etraci("exp6 {} status", egetn(value(STRstatus)), vp); -#endif return (putn(egetn(value(STRstatus)) == 0)); } if (isa(**vp, ANYOP)) @@ -558,15 +481,9 @@ exp6(Char ***vp, bool ignore) break; } } -#ifdef EDEBUG - etraci("exp6 -? i", i, vp); -#endif xfree(ep); return (putn(i)); } -#ifdef EDEBUG - etracc("exp6 default", cp, vp); -#endif return (ignore & NOGLOB ? Strsave(cp) : globone(cp, G_ERROR)); } @@ -655,20 +572,3 @@ egetn(Char *cp) } /* Phew! */ - -#ifdef EDEBUG -static void -etraci(char *str, int i, Char ***vp) -{ - (void) fprintf(csherr, "%s=%d\t", str, i); - blkpr(csherr, *vp); - (void) fprintf(csherr, "\n"); -} -static void -etracc(char *str, Char *cp, Char ***vp) -{ - (void) fprintf(csherr, "%s=%s\t", str, vis_str(cp)); - blkpr(csherr, *vp); - (void) fprintf(csherr, "\n"); -} -#endif |