Changeset 6626

Timestamp:

May 29, 2007, 5:34:36 AM (18 years ago)

Author:

Gary Byers

Message:

:raw break command shows raw frame contents.

File:

• branches/ide-1.0/ccl/level-1/l1-readloop-lds.lisp (modified) (1 diff)

branches/ide-1.0/ccl/level-1/l1-readloop-lds.lisp

@@ -141 +141 @@
                        :count 1
                        :detailed-p t))
+
+(define-toplevel-command :break raw (n) "Show raw contents of backtrace frame <n>"
+   (print-call-history :origin *break-frame*
+                       :start-frame-number n
+                       :count 1
+                       :detailed-p :raw))
 
 (define-toplevel-command :break v (n frame-number) "Return value <n> in frame <frame-number>"