From 60577f43c98b249f1ffc7024516652f2b265a90f Mon Sep 17 00:00:00 2001
From: Juan Jose Garcia Ripoll <jjgarcia@users.sourceforge.net>
Date: Thu, 8 Dec 2011 00:07:59 +0100
Subject: [PATCH] SBCL needs a QUIT statement because it will not exit even
 when the input stream is empty.

---
 src/tests/config.lsp.in | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/src/tests/config.lsp.in b/src/tests/config.lsp.in
index 6978de806..353c939cf 100644
--- a/src/tests/config.lsp.in
+++ b/src/tests/config.lsp.in
@@ -264,6 +264,10 @@
     (ql:quickload ~s)
     (princ \"ECL-BUILD-OK\"))
   (serious-condition (c) (princ c)))
+#+ecl
+(ext:quit)
+#+sbcl
+(sb-ext:quit)
 ")
 
 (defconstant +quicklisp-test-template+ "
@@ -279,6 +283,10 @@
     (asdf:oos 'asdf:test-op :$name)
     (princ \"ECL-TEST-OK\"))
   (serious-condition (c) (princ c)))
+#+ecl
+(ext:quit)
+#+sbcl
+(sb-ext:quit)
 ")
 
 (defun run-quicklisp-tests (&optional (output (merge-pathnames "quicklisp.log"