X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=tests%2Fdefun.lisp;fp=tests%2Fdefun.lisp;h=39f945eb1eeacc00522162e5e7e647b91bbb02f8;hb=76337cf1599389fdf8ab3f1c40a5f62b123a6237;hp=0000000000000000000000000000000000000000;hpb=b77b6a4908af064451bf5292c0a3a5aa65581dfe;p=jscl.git

diff --git a/tests/defun.lisp b/tests/defun.lisp
new file mode 100644
index 0000000..39f945e
--- /dev/null
+++ b/tests/defun.lisp
@@ -0,0 +1,4 @@
+;;;; Tests for DEFUN
+
+;;; Regression test for #111
+(test (eql (defun foo () "foo's" ()) 'foo))