;; Benchmark: 159ns
;; Benchmark-Repeat: 12580
;; Nested Macro and Arithmetic example

(do
    (macro square [x] `(* ~x ~x))
    (macro power4 [x] `(square (square ~x)))
    (assert-eq 81 (power4 3)))