projects
/
unix-history
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
tags
|
clone url
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
blame
|
history
|
raw
|
HEAD
date and time created 88/07/21 17:35:50 by marc
[unix-history]
/
usr
/
src
/
local
/
sccscmds
/
sccscmds.ok
/
util
/
verify.c
static char
Sccsid
[] =
"@(#)verify.c 1.2 %G%"
;
/*
If `astr1' contains any characters not in `str2' return the
offset of the first such character found in `astr1',
else return -1.
*/
verify
(
astr1
,
str2
)
char
*
astr1
;
register
char
*
str2
;
{
register
char
*
str1
;
for
(
str1
=
astr1
; *
str1
;
str1
++)
if
(!
any
(*
str1
,
str2
))
return
(
str1
-
astr1
-
1
);
return
(-
1
);
}