diff --git a/tests/resources/issue-24.lisp b/tests/resources/issue-24.lisp
new file mode 100644
index 0000000000000000000000000000000000000000..397241c4e888cc5ca22aacded52768d5a5477354
--- /dev/null
+++ b/tests/resources/issue-24.lisp
@@ -0,0 +1,5 @@
+;; Test case from issue #24.
+(defun foo ()
+  (print "Hello world"))
+
+(compile 'foo)