impls/tests/perf2.mal

   1 (load-file      "../lib/load-file-once.mal")
   2 (load-file-once "../tests/computations.mal") ; fib sumdown
   3 (load-file-once "../lib/perf.mal")           ; time
   4
   5 ;;(prn "Start: basic math/recursion test")
   6
   7 (time (do
   8   (sumdown 10)
   9   (fib 12)))
  10
  11 ;;(prn "Done: basic math/recursion test")