#define EQ(a,b) ((tmp=a)==0?0:(strcmp(tmp,b)==0))
ac
= argc
; av
= argv
; ap
= 1;
synbad("argument expected","");
if (EQ(nxtarg(1), "-o")) return(p1
| exp());
if (EQ(nxtarg(1), "-a")) return (p1
& e1());
if(!EQ(nxtarg(0), ")")) synbad(") expected","");
return(tio(nxtarg(0), 0));
return(tio(nxtarg(0), 1));
return(ftype(nxtarg(0))==DIR);
return(ftype(nxtarg(0))==FIL
);
return(fsizep(nxtarg(0)));
return(isatty(atoi(nxtarg(0))));
return(!EQ(nxtarg(0), ""));
return(EQ(nxtarg(0), ""));
return(EQ(nxtarg(0), a
));
return(!EQ(nxtarg(0), a
));
synbad("unknown operator ",p2
);
if((statb
.st_mode
&S_IFMT
)==S_IFDIR
)
write(2, s1
, strlen(s1
));
write(2, s2
, strlen(s2
));