cl-hssg/test/hssg/sample-files/metadata.lisp

8 lines
220 B
Common Lisp

;;; This file produces HSSG metadata when read by a Lisp reader
(defun throwaway-function ()
"This function must not leak out of this file"
"foo")
`((:foo . ,(throwaway-function))
(:bar . "bar")
(:baz . "baz"))