anchor.diff:        (debug-print-line-1 things)
         (when extra
           (funcall extra)))
  -    (debug-dump-threads)
  +    (debug-dump)
       (loop (%arch-panic-stop))))
   
   (defmacro ensure (condition &rest things)
  
positive.code:         (debug-print-line "----------")
          (dump-thread thread (thread-frame-pointer thread))))))
  
  (defun debug-magic-button ()
    ;; Try to bring all the other CPUs to a complete stop before doing anything.
    (stop-other-cpus-for-debug-magic-button)
    (debug-print-line "---- Begin magic button dump ----")
    (debug-dump-threads)
    (debug-print-line "---- End magic button dump ----")
    (resume-other-cpus-for-debug-magic-button))
  
  
negative.code:                       (if (irq-attachment-exclusive-p a) " [exclusive]" "")
                        (if (irq-attachment-pending-eoi a) " EOI pending" ""))))
  
  (defun dump-threads ()
    (dump-thread (current-thread) (sys.int::read-frame-pointer))
    (when (boundp '*all-threads*)
      (do ((thread *all-threads*
  