0.9.4.6:

[sbcl.git] / tests / backq.impure.lisp

diff --git a/tests/backq.impure.lisp b/tests/backq.impure.lisp
index cd70cea..5fea61f 100644 (file)
--- a/tests/backq.impure.lisp
+++ b/tests/backq.impure.lisp
@@ -61,6 +61,3 @@
 (let ((a '`(1 ,@a ,@b ,.c ,.d)))
   (let ((*print-circle* t))
     (assert (equal (read-from-string (write-to-string a)) a))))
-
-;;; success
-(quit :unix-status 104)