|
|
DataMuseum.dkPresents historical artifacts from the history of: DKUUG/EUUG Conference tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about DKUUG/EUUG Conference tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 326 (0x146)
Types: TextFile
Names: »has.c«
└─⟦b20c6495f⟧ Bits:30007238 EUUGD18: Wien-båndet, efterår 1987
└─⟦this⟧ »EUUGD18/General/Ash/has.c«
/*
** Utility for ASH.
** has list element
*/
exit(X) { _exit(X); }
main(ac, av)
int ac;
char *av[];
{
register char *p;
register char *q;
register int l;
if (ac == 3)
for (p = av[2], q = av[1], l = strlen(p); *q; q++)
if (*p == *q && strncmp(p, q, l) == 0)
_exit(0);
_exit(1);
}