git/t/t4018/scheme-lisp-defun-b

5 lines
106 B
Plaintext

(macrolet ((foo (x) `(bar ,x)))
(defun mumble (x) ; RIGHT
(when (> x 0)
(foo x)))) ; ChangeMe