* Copyright (c) 1991 The Regents of the University of California.
* %sccs.include.proprietary.c%
"@(#) Copyright (c) 1991 The Regents of the University of California.\n\
static char sccsid
[] = "@(#)test.c 5.1 (Berkeley) %G%";
#define EQ(a,b) ((tmp=a)==0?0:(strcmp(tmp,b)==0))
ac
= argc
; av
= argv
; ap
= 1;
synbad("too many arguments","");
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
));
return(int1
==atoi(nxtarg(0)));
return(int1
!=atoi(nxtarg(0)));
return(int1
>atoi(nxtarg(0)));
return(int1
<atoi(nxtarg(0)));
return(int1
>=atoi(nxtarg(0)));
return(int1
<=atoi(nxtarg(0)));
if((statb
.st_mode
&S_IFMT
)==S_IFDIR
)
(void) write(2, "test: ", 6);
(void) write(2, s1
, strlen(s1
));
(void) write(2, s2
, strlen(s2
));
(void) write(2, "\n", 1);