X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Fcold-error.lisp;h=869cdbbc947d1402527fe44b99eeab8da0cc5e88;hb=2d0b882f9eabffe5e2d32c0e2e7ab06c96f4fea3;hp=b5aaa581408328ce4ae3dd5eb2f0404a951edacb;hpb=82e0a78df47685519b12683f495d7ae19e07d3cf;p=sbcl.git

diff --git a/src/code/cold-error.lisp b/src/code/cold-error.lisp
index b5aaa58..869cdbb 100644
--- a/src/code/cold-error.lisp
+++ b/src/code/cold-error.lisp
@@ -72,7 +72,9 @@
   #!+sb-doc
   "Invoke the signal facility on a condition formed from datum and arguments.
    If the condition is not handled, the debugger is invoked."
-  (/show0 "entering ERROR, arguments=..")
+  (/show0 "entering ERROR, argument list=..")
+  (/hexstr arguments)
+  (/show0 "printing ERROR arguments one by one..")
   #!+sb-show (dolist (argument arguments)
 	       (sb!impl::cold-print argument))
   (sb!kernel:infinite-error-protect