From c1564e03f9bcc3d3696acfed62197ac4026841d2 Mon Sep 17 00:00:00 2001 From: Nikodemus Siivola Date: Wed, 23 Nov 2011 20:27:38 +0200 Subject: [PATCH] marginally prettier native debugger banner Add a conditional newline before printing the thread object. --- src/code/debug.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/code/debug.lisp b/src/code/debug.lisp index 014103c..6791ac9 100644 --- a/src/code/debug.lisp +++ b/src/code/debug.lisp @@ -583,7 +583,7 @@ reset to ~S." ;; definitely preferred, because the FORMAT alternative was acting odd. (pprint-logical-block (stream nil) (format stream - "debugger invoked on a ~S~@[ in thread ~A~]: ~2I~_~A" + "debugger invoked on a ~S~@[ in thread ~_~A~]: ~2I~_~A" (type-of condition) #!+sb-thread sb!thread:*current-thread* #!-sb-thread nil -- 1.7.10.4