PRUEBAS.LSP



; ejemplo de macro
; ejecutar como (push item pila)
; es el equivalente de pilas
(defmacro push (i s) `(setq ,s (cons ,i ,s)))