mirror of
https://github.com/SEPPDROID/Digital-Research-Source-Code.git
synced 2025-10-23 08:24:18 +00:00
23 lines
245 B
C
23 lines
245 B
C
|
|
/*
|
|
Copyright 1983
|
|
Alcyon Corporation
|
|
8716 Production Ave.
|
|
San Diego, CA 92121
|
|
|
|
@(#) __length.c - Sep 12, 1983 REGULUS 4.1
|
|
*/
|
|
|
|
__length(s)
|
|
char *s;
|
|
{
|
|
register int l;
|
|
register char *p;
|
|
|
|
p = s;
|
|
l = 0;
|
|
while (*p++)
|
|
l++;
|
|
return(l);
|
|
}
|