home *** CD-ROM | disk | FTP | other *** search
/ Club Amiga de Montreal - CAM / CAM_CD_1.iso / files / 109.lha / PD_C / lib / strlen.c < prev    next >
Text File  |  1986-11-20  |  283b  |  17 lines

  1. /*
  2.  * strlen - length of string (not including NUL)
  3.  */
  4. SIZET
  5. strlen(s)
  6. CONST char *s;
  7. {
  8.          register CONST char *scan;
  9.          register SIZET count;
  10.  
  11.          count = 0;
  12.          scan = s;
  13.          while (*scan++ != '\0')
  14.                    count++;
  15.          return(count);
  16. }
  17.