COMPILE-FILE shouldn't "attempt to dump invalid structure" anymore

[sbcl.git] / tests / bug-943953.lisp

diff --git a/tests/bug-943953.lisp b/tests/bug-943953.lisp
new file mode 100644 (file)
index 0000000..933e842
--- /dev/null
+++ b/tests/bug-943953.lisp
@@ -0,0 +1,3 @@
+(defun foo (&optional count)
+  (declare (fixnum count))
+  count)