ack/lang/cem/libcc/gen/strlen.c
1987-03-31 10:45:53 +00:00

12 lines
139 B
C

/* $Header$ */
int strlen(s)
char *s;
{
/* Return length of s. */
char *original = s;
while (*s != 0) s++;
return(s - original);
}