mumble

A Lisp written in C, following the *Build Your Own Lisp* book
Log | Files | Refs | README

fib.smallc (247B)

      1 #include "stdio.h"
      2 
      3 int fib(int n) {
      4   if (n == 0) { return 0; } 
      5   if (n == 1) { return 1; }
      6   return fib(n - 1) + fib(n - 2);
      7 }
      8 
      9 main() {
     10   
     11   int n;
     12   int i;
     13   
     14   while (i < 10) {
     15     n = fib(10);
     16     print(n);
     17     i = i + 1;
     18   }
     19 
     20   return 0;
     21 }