6 (debug (if 2 (+ 2 1) 0))
7 (debug (= (+ 2 1) (- 4 1)))
10 (debug "---VARIABLES---")
12 (%compile-defvar 'name))
17 (debug "---FUNCTIONS---")
20 (fsetq f (lambda (x) (+ x 10)))
24 (debug "---MACROS---")
27 (%compile-defmacro 'incf
29 (list 'setq y (list '+ 1 y)))))