usr/contrib/lib/emacs/lisp/debug.elc


(setq debugger (quote debug))

(defun debug (&rest debugger-args) "\
Enter debugger.  Returns if user says \"continue\".
Arguments are mainly for use when this is called
 from the internals of the evaluator.
You may call with no args, or you may
 pass nil as the first arg and any other args you like.
 In that case, the list of args after the first will
 be printed into the backtrace buffer." (byte-code "ÓÔ!\88ÃÕ ÃÃÖ\1e\ 6×Ø!)pÃÃÃ\1e
\1e       \1e\b\1e\a\1d\1c\1a\19\18Ù\8e\8aÚ\8b))\88\ e\b\89\16\12\88\b.       \87" [debugger-value debugger-match-data debug-on-error nil debug-on-quit debugger-buffer default-major-mode debugger-old-buffer debugger-step-after-exit executing-macro cursor-in-echo-area standard-output print-escape-newlines t print-length debugger-args inhibit-trace buffer-read-only debug-on-next-call message "Entering debugger..." match-data fundamental-mode generate-new-buffer "*Backtrace*" ((byte-code "Â\b!\88Ã    !\87" [debugger-buffer debugger-match-data kill-buffer store-match-data] 3)) ((byte-code "Ê\b!\88Ë \88pÃÌ\1c\1a\19Í +\88eb\88Î \88Ï`ÐÑ!\88ÒÓ!\88`\"\88
@Ô>\83F