home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD1.mdf / magazine / pctech / 1988_02 / bench5.c < prev    next >
Text File  |  1983-08-03  |  640b  |  33 lines

  1.  
  2. #include "stdio.h"
  3. int bench5()    /* character count benchmark */
  4.  {
  5.     int i ;
  6.     char s[501] ;
  7.     int cnt[128] ;
  8.  
  9.     for(i=0 ; i < 500 ; i=i+1 )
  10.        { s[i] = i + 1 ; } ;
  11.     s[500] = '\0' ;
  12.  
  13.     for( i=0 ; i < 100 ; i=i+1 )
  14.        { count_chars(s,cnt) ; } ;
  15.  }
  16.  
  17. int count_chars(string,counts)
  18.  char string[] ;
  19.  int counts[] ;
  20.  {
  21.    register int i ;
  22.    register char c ;
  23.  
  24.    i=0 ;
  25.    c = string[i] ;
  26.    while( c != '\0' )
  27.      { counts[ c & 0x7f ] ++ ; 
  28.        i = i + 1 ;
  29.        c = string[i] ;
  30.      } ;
  31.  }
  32.  
  33.