X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=contrib%2Fsb-rt%2Frt.lisp;h=8601ef70e1c8ef3ccc72ad7a2f8b4a43db97954f;hb=8369a441bfd49566e70939c25f42f8d1f5423e4e;hp=77a4560fd4081389c4125146f0782429f44bab25;hpb=4898ef32c639b1c7f4ee13a5ba566ce6debd03e6;p=sbcl.git

diff --git a/contrib/sb-rt/rt.lisp b/contrib/sb-rt/rt.lisp
index 77a4560..8601ef7 100644
--- a/contrib/sb-rt/rt.lisp
+++ b/contrib/sb-rt/rt.lisp
@@ -248,7 +248,6 @@
                    ~:@(~{~<~%   ~1:;~S~>~
                          ~^, ~}~)."
                     (length new-failures)
-                    new-failures)))
-          ))
+                    new-failures)))))
       (finish-output s)
-      (null pending))))
+      (values (null new-failures) (null pending) pending))))