Login

Ben / Nujel

Overview Code Talk CI Settings
7 branches 0 tags
Ben (X13/Arch) Fixed switch fallback when jumptable doens't work a4c687e 1 year ago 1240 Commits
nujel / benchmark / recfib / fib.nuj
Raw
application/octet-stream • 212 B • 8 lines 
#!/usr/bin/env nujel

(defn fib (n)
      (cond ((zero? n) 0)
            ((= 1 n) 1)
            (#t (+ (fib (- n 1)) (fib (- n 2))))))

(pfmtln "fib(30) is: {}\nGC Runs: {}" (fib 30) (garbage-collection-runs))