home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / INFO / C / CLMFEB85.ZIP / BENMRK.FIB < prev    next >
Encoding:
Text File  |  1988-07-25  |  768 b   |  34 lines
  1.  
  2.                         The Fib Benchmark
  3.                        C Compiler Analysis
  4.                  February 1985 COMPUTER LANGUAGE
  5.  
  6.  
  7. /* Fibonacci Number Generator in C */
  8. #include "STDIO.H"
  9. #define NTIMES 10         /* number of times to computer Fibonacci value */
  10.  
  11. #define NUMBER 24         /* biggest that can be computed in 16 bits */
  12.  
  13.  
  14. void main()                /* compute Fibonacci value */
  15.     {
  16.     int i;
  17.     unsigned value, fib();
  18.  
  19.     printf("%d iterations:  ", NTIMES);
  20.     for (i = 1;  i <= NTIMES;  i++)
  21.         value = fib(NUMBER);
  22.     printf("Fibonacci(%d) = %u.\n", NUMBER, value);
  23.     exit(0);
  24.     }
  25.  
  26. unsigned fib(x)            /* compute Fibonacci number recursively */
  27. int x;
  28.     {
  29.  
  30.     if (x > 2)
  31.         return (fib(x - 1) + fib(x - 2));
  32.     else return (1);
  33.     }
  34.