source-test.lisp 95 Bytes
Newer Older
ram's avatar
ram committed
1 2 3 4 5 6 7

(defmacro zoq (x)
  `(roq (ploq (+ ,x 3))))

(defun foo (y)
  (declare (symbol y))
  (zoq y))