fork download
  1. (defmacro createList (a b c)
  2. (let ((lst (list a b c)))
  3. (write lst)))
  4.  
  5. (format t "~%Expanded ~a~%" (macroexpand-1 '(createList 1 2 3)))
Success #stdin #stdout 0s 10512KB
stdin
Standard input is empty
stdout
(1 2 3)
Expanded (1 2 3)