From 29f0545ba7ae947489d2d5fab0faa2b499096713 Mon Sep 17 00:00:00 2001 From: Juho Snellman Date: Sun, 4 Mar 2007 23:47:58 +0000 Subject: [PATCH] 1.0.3.28: handle output for fatal-compiler-errors more consistently * Format the output like it's done for other errors / warnings * Output to *error-output* * Output unconditionally regardless of the value of *compiler-verbose* --- src/compiler/main.lisp | 4 ++-- version.lisp-expr | 2 +- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/src/compiler/main.lisp b/src/compiler/main.lisp index 4c08cd7..168fe6f 100644 --- a/src/compiler/main.lisp +++ b/src/compiler/main.lisp @@ -1523,8 +1523,8 @@ ;; the input file. (fatal-compiler-error (condition) (signal condition) - (when *compile-verbose* - (format *standard-output* + (pprint-logical-block (*error-output* nil :per-line-prefix "; ") + (format *error-output* "~@" condition)) (values nil t t))))) diff --git a/version.lisp-expr b/version.lisp-expr index 540d01b..4baac58 100644 --- a/version.lisp-expr +++ b/version.lisp-expr @@ -17,4 +17,4 @@ ;;; checkins which aren't released. (And occasionally for internal ;;; versions, especially for internal versions off the main CVS ;;; branch, it gets hairier, e.g. "0.pre7.14.flaky4.13".) -"1.0.3.27" +"1.0.3.28" -- 1.7.10.4