1*30488Slepreau static char Sccsid[] = "@(#)verify.c	1.2	02/15/87";
230485Slepreau /*
330485Slepreau 	If `astr1' contains any characters not in `str2' return the
430485Slepreau 	offset of the first such character found in `astr1',
530485Slepreau 	else return -1.
630485Slepreau */
730485Slepreau 
verify(astr1,str2)830485Slepreau verify(astr1,str2)
930485Slepreau char *astr1;
1030485Slepreau register char *str2;
1130485Slepreau {
1230485Slepreau 	register char *str1;
1330485Slepreau 
1430485Slepreau 	for (str1=astr1; *str1; str1++)
1530485Slepreau 		if (!any(*str1,str2))
1630485Slepreau 			return(str1 - astr1 - 1);
1730485Slepreau 	return(-1);
1830485Slepreau }
19