test.lisp

   1 (lambda (x y)
   2   x)
   3
   4 (eval-when-compile
   5   (%compile-defvar 'name))
   6 (setq name 10)
   7 (debug name)
   8
   9 (debug "hola")
  10 (debug '(1 2 3 4))
  11 (debug (if 2 (+ 2 1) 0))
  12 (debug (= (+ 2 1) (- 4 1)))