diff --git a/tests/issues.lisp b/tests/issues.lisp index 26647dd265ff98812ea83ec93f5fea08a98b88af..5bf1fb0b7e28d5ba1b27ca440e643b9d078e2873 100644 --- a/tests/issues.lisp +++ b/tests/issues.lisp @@ -310,3 +310,8 @@ (assert-true (pathnamep fasl-file)) (assert-equalp (list fasl-file nil nil) (multiple-value-list (compile-file test-file :load t))))) + +(define-test issue.24 + (:tag :issues) + (let* ((test-file #.(merge-pathnames #p"resources/issue-24.lisp" cl:*load-pathname*))) + (assert-true (compile-file test-file :load t))))