From ae93b43b3763dd21fba6dfa45552c8b683992715 Mon Sep 17 00:00:00 2001
From: Raymond Toy <toy.raymond@gmail.com>
Date: Sat, 10 Sep 2016 12:40:34 -0700
Subject: [PATCH] Add test for issue #24.

---
 tests/issues.lisp | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/tests/issues.lisp b/tests/issues.lisp
index 26647dd26..5bf1fb0b7 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))))
-- 
GitLab