0.9.2.43:

[sbcl.git] / src / code / cross-condition.lisp

diff --git a/src/code/cross-condition.lisp b/src/code/cross-condition.lisp
index 5c2f821..cd8580c 100644 (file)
--- a/src/code/cross-condition.lisp
+++ b/src/code/cross-condition.lisp
@@ -45,17 +45,17 @@
   (:report
    (lambda (condition stream)
      (format stream
-            "~@<  ~? ~:@_~?~:>"
-            (simple-condition-format-control condition)
-            (simple-condition-format-arguments condition)
-            "~@<If you see this and are an SBCL ~
+             "~@<  ~? ~:@_~?~:>"
+             (simple-condition-format-control condition)
+             (simple-condition-format-arguments condition)
+             "~@<If you see this and are an SBCL ~
 developer, then it is probable that you have made a change to the ~
 system that has broken the ability for SBCL to compile, usually by ~
 removing an assumed invariant of the system, but sometimes by making ~
 an averrance that is violated (check your code!). If you are a user, ~
 please submit a bug report to the developers' mailing list, details of ~
 which can be found at <http://sbcl.sourceforge.net/>.~:@>"
-            ()))))
+             ()))))
 
 ;;; These are should never be instantiated before the real definitions
 ;;; come in.