blob: 73488f8a00521922b7a63c9b15d29a0edf9a8e4b (
plain)
1
2
3
4
5
6
7
8
9
10
11
|
(load-file "../core.mal")
(load-file "../perf.mal")
;;(prn "Start: basic macros performance test")
(time (do
(or false nil false nil false nil false nil false nil 4)
(cond false 1 nil 2 false 3 nil 4 false 5 nil 6 "else" 7)
(-> (list 1 2 3 4 5 6 7 8 9) rest rest rest rest rest rest first)))
;;(prn "Done: basic macros performance test")
|
