Simplify the tests in /CANNOT-SHOW and eliminate an "unreachable code" warning.
commit24e53f8d9f53d8001e684ecfe56efb84a3dae4f5
authorDouglas Katzman <dougk@google.com>
Sat, 6 Dec 2014 19:42:41 +0000 (6 14:42 -0500)
committerDouglas Katzman <dougk@google.com>
Sat, 6 Dec 2014 19:42:41 +0000 (6 14:42 -0500)
tree8e4b9b31fe2604ac1fc20a2d45b9be98cd7f4558
parent8cab88718048e00d282d659845bcd5ba6525a512
Simplify the tests in /CANNOT-SHOW and eliminate an "unreachable code" warning.

This change started out with the intent of just getting rid of the warning
about (VALUES) being dead code, because the preceding ERROR kills it.

Then I observed that a KLUDGE by CSR (ca. 2002) could be removed by moving
string-dispatch later in its file, becoming a def!macro, which needs
sane-package, which is defined above in the same file.

Moreover, two of the failure modes in SUPPRESS-/SHOW-P no longer apply,
as *TRACE-OUTPUT* is set immediately in cold-init.
And since (WRITE `(EXPR= ,(EXPR) ,(OTHEREXPR) ...)) works really early,
for the most part /SHOW and /SHOW0 should be considered deprecated.

It would be great if somebody would make cold-stderr-stream work on win32.
src/code/cold-init.lisp
src/code/error.lisp
src/code/interr.lisp
src/code/primordial-extensions.lisp
src/code/show.lisp
src/compiler/proclaim.lisp