(defmacro string-append (outputstr &rest args)
`(setq ,outputstr (concatenate 'string ,outputstr ,@args)))
(defmacro string-append (outputstr &rest args)
`(setq ,outputstr (concatenate 'string ,outputstr ,@args)))
(defun list-to-string (lst)
"Converts a list to a string, doesn't include any delimiters between elements"
(format nil "~{~A~}" lst))
(defun list-to-string (lst)
"Converts a list to a string, doesn't include any delimiters between elements"
(format nil "~{~A~}" lst))