/* -*- Mode: C; -*- * ---------------------------------------------------------------------------- * Title: Fibonacci function using dynbind * Created: 2020-05-24 * Author: Gilbert Baumann * ---------------------------------------------------------------------------- * (c) copyright 2020 by Gilbert Baumann */ #include #include "dynbind.h" int nest = 0; int fib (int n) { printf ("%*sfib(%d)\n", nest * 2, "", n); dynbind (nest, nest + 1) { if (n <= 1) return 1; else return fib (n - 1) + fib (n - 2); } } int main (int argc, char **argv) { int n; (void)argc; (void)argv; n = 6; printf ("\n----\nfib (%d) = %d\n", n, fib (n)); return 0; }