DataMuseum.dk

top - metrics - download

    Length: 4397 (0x112d)
    Names: »dbx.elc«

└─⟦a05ed705a⟧ Bits:30007078 DKUUG GNU 2/12/89
    └─⟦46d41b2d0⟧ »./emacs-18.55.tar.Z« 
        └─⟦fa971747f⟧ 
            └─⟦this⟧ »dist-18.55/lisp/dbx.elc« 

Hex Dump

0x0000…0020 0a 28 72 65 71 75 69 72 65 20 28 71 75 6f 74 65 20 73 68 65 6c 6c 29 29 0a 0a 28 64 65 66 76 61   ┆ (require (quote shell))  (defva┆
0x0020…0040 72 20 64 62 78 2d 74 72 61 63 65 2d 66 6c 61 67 20 6e 69 6c 20 22 5c 0a 44 62 78 20 74 72 61 63   ┆r dbx-trace-flag nil "\ Dbx trac┆
0x0040…0060 65 20 73 77 69 74 63 68 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 64 62 78 2d 70 72 6f 63 65 73 73   ┆e switch.")  (defvar dbx-process┆
0x0060…0080 20 6e 69 6c 20 22 5c 0a 54 68 65 20 70 72 6f 63 65 73 73 20 69 6e 20 77 68 69 63 68 20 64 62 78   ┆ nil "\ The process in which dbx┆
0x0080…00a0 20 69 73 20 72 75 6e 6e 69 6e 67 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 64 62 78 2d 62 72 65 61   ┆ is running.")  (defvar dbx-brea┆
0x00a0…00c0 6b 2d 70 6f 69 6e 74 20 22 73 74 6f 70 70 65 64 20 69 6e 20 2e 2a 20 61 74 20 6c 69 6e 65 20 5c   ┆k-point "stopped in .* at line \┆
0x00c0…00e0 5c 28 5b 30 2d 39 5d 2a 5c 5c 29 20 69 6e 20 66 69 6c 65 20 5c 22 5c 5c 28 5b 5e 5c 22 5d 2a 5c   ┆\([0-9]*\\) in file \"\\([^\"]*\┆
0x00e0…0100 5c 29 5c 22 22 20 22 5c 0a 52 65 67 65 78 70 20 6f 66 20 70 61 74 74 65 72 6e 20 74 68 61 74 20   ┆\)\"" "\ Regexp of pattern that ┆
0x0100…0120 64 62 78 20 77 72 69 74 65 73 20 61 74 20 62 72 65 61 6b 20 70 6f 69 6e 74 2e 22 29 0a 0a 28 64   ┆dbx writes at break point.")  (d┆
0x0120…0140 65 66 76 61 72 20 69 6e 66 65 72 69 6f 72 2d 64 62 78 2d 6d 6f 64 65 2d 6d 61 70 20 6e 69 6c 29   ┆efvar inferior-dbx-mode-map nil)┆
0x0140…0160 0a 0a 28 69 66 20 69 6e 66 65 72 69 6f 72 2d 64 62 78 2d 6d 6f 64 65 2d 6d 61 70 20 6e 69 6c 20   ┆  (if inferior-dbx-mode-map nil ┆
0x0160…0180 28 73 65 74 71 20 69 6e 66 65 72 69 6f 72 2d 64 62 78 2d 6d 6f 64 65 2d 6d 61 70 20 28 63 6f 70   ┆(setq inferior-dbx-mode-map (cop┆
0x0180…01a0 79 2d 6b 65 79 6d 61 70 20 73 68 65 6c 6c 2d 6d 6f 64 65 2d 6d 61 70 29 29 20 28 64 65 66 69 6e   ┆y-keymap shell-mode-map)) (defin┆
0x01a0…01c0 65 2d 6b 65 79 20 69 6e 66 65 72 69 6f 72 2d 64 62 78 2d 6d 6f 64 65 2d 6d 61 70 20 22 03 77 22   ┆e-key inferior-dbx-mode-map " w"┆
0x01c0…01e0 20 28 71 75 6f 74 65 20 64 62 78 2d 77 68 65 72 65 29 29 20 28 64 65 66 69 6e 65 2d 6b 65 79 20   ┆ (quote dbx-where)) (define-key ┆
0x01e0…0200 69 6e 66 65 72 69 6f 72 2d 64 62 78 2d 6d 6f 64 65 2d 6d 61 70 20 22 03 14 22 20 28 71 75 6f 74   ┆inferior-dbx-mode-map "  " (quot┆
0x0200…0220 65 20 64 62 78 2d 74 72 61 63 65 2d 6d 6f 64 65 29 29 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 63   ┆e dbx-trace-mode)) (define-key c┆
0x0220…0240 74 6c 2d 78 2d 6d 61 70 20 22 00 22 20 28 71 75 6f 74 65 20 64 62 78 2d 73 74 6f 70 2d 61 74 29   ┆tl-x-map " " (quote dbx-stop-at)┆
0x0240…0260 29 29 0a 0a 28 64 65 66 75 6e 20 69 6e 66 65 72 69 6f 72 2d 64 62 78 2d 6d 6f 64 65 20 6e 69 6c   ┆))  (defun inferior-dbx-mode nil┆
0x0260…0280 20 22 5c 0a 4d 61 6a 6f 72 20 6d 6f 64 65 20 66 6f 72 20 69 6e 74 65 72 61 63 74 69 6e 67 20 77   ┆ "\ Major mode for interacting w┆
0x0280…02a0 69 74 68 20 61 6e 20 69 6e 66 65 72 69 6f 72 20 44 62 78 20 70 72 6f 63 65 73 73 2e 0a 0a 54 68   ┆ith an inferior Dbx process.  Th┆
0x02a0…02c0 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 63 6f 6d 6d 61 6e 64 73 20 61 72 65 20 61 76 61 69 6c 61 62   ┆e following commands are availab┆
0x02c0…02e0 6c 65 3a 0a 5c 5c 7b 69 6e 66 65 72 69 6f 72 2d 64 62 78 2d 6d 6f 64 65 2d 6d 61 70 7d 0a 0a 45   ┆le: \\{inferior-dbx-mode-map}  E┆
0x02e0…0300 6e 74 72 79 20 74 6f 20 74 68 69 73 20 6d 6f 64 65 20 63 61 6c 6c 73 20 74 68 65 20 76 61 6c 75   ┆ntry to this mode calls the valu┆
0x0300…0320 65 20 6f 66 20 64 62 78 2d 6d 6f 64 65 2d 68 6f 6f 6b 20 77 69 74 68 20 6e 6f 20 61 72 67 75 6d   ┆e of dbx-mode-hook with no argum┆
0x0320…0340 65 6e 74 73 2c 0a 69 66 20 74 68 61 74 20 76 61 6c 75 65 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2e 20   ┆ents, if that value is non-nil. ┆
0x0340…0360 20 4c 69 6b 65 77 69 73 65 20 77 69 74 68 20 74 68 65 20 76 61 6c 75 65 20 6f 66 20 73 68 65 6c   ┆ Likewise with the value of shel┆
0x0360…0380 6c 2d 6d 6f 64 65 2d 68 6f 6f 6b 2e 0a 64 62 78 2d 6d 6f 64 65 2d 68 6f 6f 6b 20 69 73 20 63 61   ┆l-mode-hook. dbx-mode-hook is ca┆
0x0380…03a0 6c 6c 65 64 20 61 66 74 65 72 20 73 68 65 6c 6c 2d 6d 6f 64 65 2d 68 6f 6f 6b 2e 0a 0a 59 6f 75   ┆lled after shell-mode-hook.  You┆
0x03a0…03c0 20 63 61 6e 20 64 69 73 70 6c 61 79 20 74 68 65 20 64 65 62 75 67 67 69 6e 67 20 70 72 6f 67 72   ┆ can display the debugging progr┆
0x03c0…03e0 61 6d 20 69 6e 20 6f 74 68 65 72 20 77 69 6e 64 6f 77 20 61 6e 64 20 70 6f 69 6e 74 20 6f 75 74   ┆am in other window and point out┆
0x03e0…0400 0a 77 68 65 72 65 20 79 6f 75 20 61 72 65 20 6c 6f 6f 6b 69 6e 67 20 61 74 20 75 73 69 6e 67 20   ┆ where you are looking at using ┆
0x0400…0420 74 68 65 20 63 6f 6d 6d 61 6e 64 20 5c 5c 5b 64 62 78 2d 77 68 65 72 65 5d 2e 0a 0a 5c 5c 5b 64   ┆the command \\[dbx-where].  \\[d┆
0x0420…0440 62 78 2d 74 72 61 63 65 2d 6d 6f 64 65 5d 20 74 6f 67 67 6c 65 73 20 64 62 78 2d 74 72 61 63 65   ┆bx-trace-mode] toggles dbx-trace┆
0x0440…0460 20 6d 6f 64 65 2e 20 49 6e 20 64 62 78 2d 74 72 61 63 65 20 6d 6f 64 65 2c 0a 64 65 62 75 67 67   ┆ mode. In dbx-trace mode, debugg┆
0x0460…0480 69 6e 67 20 70 72 6f 67 72 61 6d 20 69 73 20 61 75 74 6f 6d 61 74 69 63 61 6c 6c 79 20 74 72 61   ┆ing program is automatically tra┆
0x0480…04a0 63 65 64 20 75 73 69 6e 67 20 6f 75 74 70 75 74 20 66 72 6f 6d 20 64 62 78 2e 0a 0a 54 68 65 20   ┆ced using output from dbx.  The ┆
0x04a0…04c0 63 6f 6d 6d 61 6e 64 20 5c 5c 5b 64 62 78 2d 73 74 6f 70 2d 61 74 5d 20 73 65 74 73 20 62 72 65   ┆command \\[dbx-stop-at] sets bre┆
0x04c0…04e0 61 6b 20 70 6f 69 6e 74 20 61 74 20 63 75 72 72 65 6e 74 20 6c 69 6e 65 20 6f 66 20 74 68 65 0a   ┆ak point at current line of the ┆
0x04e0…0500 70 72 6f 67 72 61 6d 20 69 6e 20 74 68 65 20 62 75 66 66 65 72 2e 20 4d 61 6a 6f 72 20 6d 6f 64   ┆program in the buffer. Major mod┆
0x0500…0520 65 20 6e 61 6d 65 20 6f 66 20 74 68 65 20 62 75 66 66 65 72 20 6d 75 73 74 20 62 65 20 69 6e 0a   ┆e name of the buffer must be in ┆
0x0520…0540 64 62 78 2d 6c 61 6e 67 75 61 67 65 2d 6d 6f 64 65 2d 6c 69 73 74 2e 0a 0a 43 6f 6d 6d 61 6e 64   ┆dbx-language-mode-list.  Command┆
0x0540…0560 73 3a 0a 0a 52 65 74 75 72 6e 20 61 74 20 65 6e 64 20 6f 66 20 62 75 66 66 65 72 20 73 65 6e 64   ┆s:  Return at end of buffer send┆
0x0560…0580 73 20 6c 69 6e 65 20 61 73 20 69 6e 70 75 74 2e 0a 52 65 74 75 72 6e 20 6e 6f 74 20 61 74 20 65   ┆s line as input. Return not at e┆
0x0580…05a0 6e 64 20 63 6f 70 69 65 73 20 72 65 73 74 20 6f 66 20 6c 69 6e 65 20 74 6f 20 65 6e 64 20 61 6e   ┆nd copies rest of line to end an┆
0x05a0…05c0 64 20 73 65 6e 64 73 20 69 74 2e 0a 5c 5c 5b 73 68 65 6c 6c 2d 73 65 6e 64 2d 65 6f 66 5d 20 73   ┆d sends it. \\[shell-send-eof] s┆
0x05c0…05e0 65 6e 64 73 20 65 6e 64 2d 6f 66 2d 66 69 6c 65 20 61 73 20 69 6e 70 75 74 2e 0a 5c 5c 5b 6b 69   ┆ends end-of-file as input. \\[ki┆
0x05e0…0600 6c 6c 2d 73 68 65 6c 6c 2d 69 6e 70 75 74 5d 20 61 6e 64 20 5c 5c 5b 62 61 63 6b 77 61 72 64 2d   ┆ll-shell-input] and \\[backward-┆
0x0600…0620 6b 69 6c 6c 2d 77 6f 72 64 5d 20 61 72 65 20 6b 69 6c 6c 20 63 6f 6d 6d 61 6e 64 73 2c 20 69 6d   ┆kill-word] are kill commands, im┆
0x0620…0640 69 74 61 74 69 6e 67 20 6e 6f 72 6d 61 6c 20 55 6e 69 78 20 69 6e 70 75 74 20 65 64 69 74 69 6e   ┆itating normal Unix input editin┆
0x0640…0660 67 2e 0a 5c 5c 5b 69 6e 74 65 72 72 75 70 74 2d 73 68 65 6c 6c 2d 73 75 62 6a 6f 62 5d 20 69 6e   ┆g. \\[interrupt-shell-subjob] in┆
0x0660…0680 74 65 72 72 75 70 74 73 20 74 68 65 20 73 68 65 6c 6c 20 6f 72 20 69 74 73 20 63 75 72 72 65 6e   ┆terrupts the shell or its curren┆
0x0680…06a0 74 20 73 75 62 6a 6f 62 20 69 66 20 61 6e 79 2e 0a 5c 5c 5b 73 74 6f 70 2d 73 68 65 6c 6c 2d 73   ┆t subjob if any. \\[stop-shell-s┆
0x06a0…06c0 75 62 6a 6f 62 5d 20 73 74 6f 70 73 2c 20 6c 69 6b 65 77 69 73 65 2e 20 5c 5c 5b 71 75 69 74 2d   ┆ubjob] stops, likewise. \\[quit-┆
0x06c0…06e0 73 68 65 6c 6c 2d 73 75 62 6a 6f 62 5d 20 73 65 6e 64 73 20 71 75 69 74 20 73 69 67 6e 61 6c 2c   ┆shell-subjob] sends quit signal,┆
0x06e0…0700 20 6c 69 6b 65 77 69 73 65 2e 0a 5c 5c 5b 64 62 78 2d 77 68 65 72 65 5d 20 64 69 73 70 6c 61 79   ┆ likewise. \\[dbx-where] display┆
0x0700…0720 73 20 64 65 62 75 67 67 69 6e 67 20 70 72 6f 67 72 61 6d 20 69 6e 20 6f 74 68 65 72 20 77 69 6e   ┆s debugging program in other win┆
0x0720…0740 64 6f 77 20 61 6e 64 0a 20 70 6f 69 6e 74 73 20 6f 75 74 20 77 68 65 72 65 20 79 6f 75 20 61 72   ┆dow and  points out where you ar┆
0x0740…0760 65 20 6c 6f 6f 6b 69 6e 67 20 61 74 2e 0a 5c 5c 5b 64 62 78 2d 74 72 61 63 65 2d 6d 6f 64 65 5d   ┆e looking at. \\[dbx-trace-mode]┆
0x0760…0780 20 74 6f 67 67 6c 65 73 20 64 62 78 2d 74 72 61 63 65 20 6d 6f 64 65 2e 0a 5c 5c 5b 64 62 78 2d   ┆ toggles dbx-trace mode. \\[dbx-┆
0x0780…07a0 73 74 6f 70 2d 61 74 5d 20 73 65 74 73 20 62 72 65 61 6b 20 70 6f 69 6e 74 20 61 74 20 63 75 72   ┆stop-at] sets break point at cur┆
0x07a0…07c0 72 65 6e 74 20 6c 69 6e 65 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 20 28 62 79 74 65 2d   ┆rent line." (interactive) (byte-┆
0x07c0…07e0 63 6f 64 65 20 22 c7 88 ca 20 88 cb 89 10 88 cc 89 11 88 cd 89 12 88 ce 0b 21 88 cf c4 21 88 d0   ┆code "                   !   !  ┆
0x07e0…0800 20 89 14 88 cf c5 21 88 d0 20 89 15 88 cf c6 21 88 c7 89 16 06 88 d1 c8 21 88 d2 89 16 08 88 d3   ┆      !        !        !       ┆
0x0800…0820 c6 0e 09 5c 22 86 48 00 d4 0e 09 42 89 16 09 88 d5 d6 d7 5c 22 87 22 20 5b 6d 61 6a 6f 72 2d 6d   ┆   \" H    B       \" " [major-m┆
0x0820…0840 6f 64 65 20 6d 6f 64 65 2d 6e 61 6d 65 20 6d 6f 64 65 2d 6c 69 6e 65 2d 70 72 6f 63 65 73 73 20   ┆ode mode-name mode-line-process ┆
0x0840…0860 69 6e 66 65 72 69 6f 72 2d 64 62 78 2d 6d 6f 64 65 2d 6d 61 70 20 6c 61 73 74 2d 69 6e 70 75 74   ┆inferior-dbx-mode-map last-input┆
0x0860…0880 2d 73 74 61 72 74 20 6c 61 73 74 2d 69 6e 70 75 74 2d 65 6e 64 20 64 62 78 2d 74 72 61 63 65 2d   ┆-start last-input-end dbx-trace-┆
0x0880…08a0 66 6c 61 67 20 6e 69 6c 20 73 68 65 6c 6c 2d 70 72 6f 6d 70 74 2d 70 61 74 74 65 72 6e 20 6d 69   ┆flag nil shell-prompt-pattern mi┆
0x08a0…08c0 6e 6f 72 2d 6d 6f 64 65 2d 61 6c 69 73 74 20 6b 69 6c 6c 2d 61 6c 6c 2d 6c 6f 63 61 6c 2d 76 61   ┆nor-mode-alist kill-all-local-va┆
0x08c0…08e0 72 69 61 62 6c 65 73 20 69 6e 66 65 72 69 6f 72 2d 64 62 78 2d 6d 6f 64 65 20 22 49 6e 66 65 72   ┆riables inferior-dbx-mode "Infer┆
0x08e0…0900 69 6f 72 20 44 62 78 22 20 28 22 3a 20 25 73 22 29 20 75 73 65 2d 6c 6f 63 61 6c 2d 6d 61 70 20   ┆ior Dbx" (": %s") use-local-map ┆
0x0900…0920 6d 61 6b 65 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 20 6d 61 6b 65 2d 6d 61 72 6b 65 72 20   ┆make-local-variable make-marker ┆
0x0920…0940 6d 61 6b 65 2d 76 61 72 69 61 62 6c 65 2d 62 75 66 66 65 72 2d 6c 6f 63 61 6c 20 22 5e 5b 5e 29   ┆make-variable-buffer-local "^[^)┆
0x0940…0960 5d 2a 64 62 78 29 20 2a 22 20 61 73 73 71 20 28 64 62 78 2d 74 72 61 63 65 2d 66 6c 61 67 20 22   ┆]*dbx) *" assq (dbx-trace-flag "┆
0x0960…0980 20 54 72 61 63 65 22 29 20 72 75 6e 2d 68 6f 6f 6b 73 20 73 68 65 6c 6c 2d 6d 6f 64 65 2d 68 6f   ┆ Trace") run-hooks shell-mode-ho┆
0x0980…09a0 6f 6b 20 64 62 78 2d 6d 6f 64 65 2d 68 6f 6f 6b 5d 20 31 32 29 29 0a 0a 28 64 65 66 75 6e 20 72   ┆ok dbx-mode-hook] 12))  (defun r┆
0x09a0…09c0 75 6e 2d 64 62 78 20 28 70 61 74 68 29 20 22 5c 0a 52 75 6e 20 61 6e 20 69 6e 66 65 72 69 6f 72   ┆un-dbx (path) "\ Run an inferior┆
0x09c0…09e0 20 44 62 78 20 70 72 6f 63 65 73 73 2c 20 69 6e 70 75 74 20 61 6e 64 20 6f 75 74 70 75 74 20 76   ┆ Dbx process, input and output v┆
0x09e0…0a00 69 61 20 62 75 66 66 65 72 20 2a 64 62 78 2a 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22   ┆ia buffer *dbx*." (interactive "┆
0x0a00…0a20 66 50 72 6f 67 72 61 6d 20 74 6f 20 64 65 62 75 67 3a 20 22 29 20 28 62 79 74 65 2d 63 6f 64 65   ┆fProgram to debug: ") (byte-code┆
0x0a20…0a40 20 22 c3 88 c5 09 21 18 c6 c7 08 c8 51 21 88 c9 09 21 89 12 88 c6 ca cb 08 50 cc c3 08 24 21 29   ┆ "    !     Q!   !       P   $!)┆
0x0a40…0a60 88 cd 70 21 89 14 88 ce 0c cf 5c 22 88 d0 20 87 22 20 5b 66 69 6c 65 20 70 61 74 68 20 64 65 66   ┆  p!      \"    " [file path def┆
0x0a60…0a80 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 6e 69 6c 20 64 62 78 2d 70 72 6f 63 65 73 73 20 66   ┆ault-directory nil dbx-process f┆
0x0a80…0aa0 69 6c 65 2d 6e 61 6d 65 2d 6e 6f 6e 64 69 72 65 63 74 6f 72 79 20 73 77 69 74 63 68 2d 74 6f 2d   ┆ile-name-nondirectory switch-to-┆
0x0aa0…0ac0 62 75 66 66 65 72 20 22 2a 64 62 78 2d 22 20 22 2a 22 20 66 69 6c 65 2d 6e 61 6d 65 2d 64 69 72   ┆buffer "*dbx-" "*" file-name-dir┆
0x0ac0…0ae0 65 63 74 6f 72 79 20 6d 61 6b 65 2d 73 68 65 6c 6c 20 22 64 62 78 2d 22 20 22 64 62 78 22 20 67   ┆ectory make-shell "dbx-" "dbx" g┆
0x0ae0…0b00 65 74 2d 62 75 66 66 65 72 2d 70 72 6f 63 65 73 73 20 73 65 74 2d 70 72 6f 63 65 73 73 2d 66 69   ┆et-buffer-process set-process-fi┆
0x0b00…0b20 6c 74 65 72 20 64 62 78 2d 66 69 6c 74 65 72 20 69 6e 66 65 72 69 6f 72 2d 64 62 78 2d 6d 6f 64   ┆lter dbx-filter inferior-dbx-mod┆
0x0b20…0b40 65 5d 20 39 29 29 0a 0a 28 64 65 66 75 6e 20 64 62 78 2d 74 72 61 63 65 2d 6d 6f 64 65 20 28 61   ┆e] 9))  (defun dbx-trace-mode (a┆
0x0b40…0b60 72 67 29 20 22 5c 0a 54 6f 67 67 6c 65 20 64 62 78 2d 74 72 61 63 65 20 6d 6f 64 65 2e 0a 57 69   ┆rg) "\ Toggle dbx-trace mode. Wi┆
0x0b60…0b80 74 68 20 61 72 67 2c 20 74 75 72 6e 20 64 62 78 2d 74 72 61 63 65 20 6d 6f 64 65 20 6f 6e 20 69   ┆th arg, turn dbx-trace mode on i┆
0x0b80…0ba0 66 66 20 61 72 67 20 69 73 20 70 6f 73 69 74 69 76 65 2e 0a 49 6e 20 64 62 78 2d 74 72 61 63 65   ┆ff arg is positive. In dbx-trace┆
0x0ba0…0bc0 20 6d 6f 64 65 2c 20 75 73 65 72 20 70 72 6f 67 72 61 6d 20 69 73 20 61 75 74 6f 6d 61 74 69 63   ┆ mode, user program is automatic┆
0x0bc0…0be0 61 6c 6c 79 20 74 72 61 63 65 64 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 50 22 29 20   ┆ally traced." (interactive "P") ┆
0x0be0…0c00 28 62 79 74 65 2d 63 6f 64 65 20 22 c3 88 08 c4 3d 3f 85 0c 00 c5 c6 21 88 0a 3f 83 17 00 09 3f   ┆(byte-code "    =?     !  ?    ?┆
0x0c00…0c20 82 1c 00 c7 0a 21 c8 56 89 11 88 c9 ca 20 21 87 22 20 5b 6d 61 6a 6f 72 2d 6d 6f 64 65 20 64 62   ┆     ! V      ! " [major-mode db┆
0x0c20…0c40 78 2d 74 72 61 63 65 2d 66 6c 61 67 20 61 72 67 20 6e 69 6c 20 69 6e 66 65 72 69 6f 72 2d 64 62   ┆x-trace-flag arg nil inferior-db┆
0x0c40…0c60 78 2d 6d 6f 64 65 20 65 72 72 6f 72 20 22 44 62 78 2d 74 72 61 63 65 20 6d 6f 64 65 20 69 73 20   ┆x-mode error "Dbx-trace mode is ┆
0x0c60…0c80 65 66 66 65 63 74 69 76 65 20 69 6e 20 69 6e 66 65 72 69 6f 72 2d 64 62 78 20 6d 6f 64 65 20 6f   ┆effective in inferior-dbx mode o┆
0x0c80…0ca0 6e 6c 79 2e 22 20 70 72 65 66 69 78 2d 6e 75 6d 65 72 69 63 2d 76 61 6c 75 65 20 30 20 73 65 74   ┆nly." prefix-numeric-value 0 set┆
0x0ca0…0cc0 2d 62 75 66 66 65 72 2d 6d 6f 64 69 66 69 65 64 2d 70 20 62 75 66 66 65 72 2d 6d 6f 64 69 66 69   ┆-buffer-modified-p buffer-modifi┆
0x0cc0…0ce0 65 64 2d 70 5d 20 35 29 29 0a 0a 28 64 65 66 75 6e 20 64 62 78 2d 66 69 6c 74 65 72 20 28 70 72   ┆ed-p] 5))  (defun dbx-filter (pr┆
0x0ce0…0d00 6f 63 65 73 73 20 73 74 72 69 6e 67 29 20 22 5c 0a 54 72 61 63 65 20 64 65 62 75 67 67 69 6e 67   ┆ocess string) "\ Trace debugging┆
0x0d00…0d20 20 70 72 6f 67 72 61 6d 20 61 75 74 6f 6d 61 74 69 63 61 6c 6c 79 20 69 66 20 64 62 78 2d 74 72   ┆ program automatically if dbx-tr┆
0x0d20…0d40 61 63 65 2d 66 6c 61 67 20 69 73 20 6e 6f 74 20 6e 69 6c 2e 22 20 28 62 79 74 65 2d 63 6f 64 65   ┆ace-flag is not nil." (byte-code┆
0x0d40…0d60 20 22 8a c5 08 21 71 88 64 62 88 60 19 0a 63 88 0b 85 16 00 c6 09 c4 5c 22 29 88 c7 08 21 85 24   ┆ "   !q db `  c        \")   ! $┆
0x0d60…0d80 00 c8 c7 08 21 64 5c 22 29 88 c5 08 21 70 3d 85 30 00 64 62 87 22 20 5b 70 72 6f 63 65 73 73 20   ┆    !d\")   !p= 0 db " [process ┆
0x0d80…0da0 62 65 67 20 73 74 72 69 6e 67 20 64 62 78 2d 74 72 61 63 65 2d 66 6c 61 67 20 74 20 70 72 6f 63   ┆beg string dbx-trace-flag t proc┆
0x0da0…0dc0 65 73 73 2d 62 75 66 66 65 72 20 64 62 78 2d 77 68 65 72 65 20 70 72 6f 63 65 73 73 2d 6d 61 72   ┆ess-buffer dbx-where process-mar┆
0x0dc0…0de0 6b 20 73 65 74 2d 6d 61 72 6b 65 72 5d 20 38 29 29 0a 0a 28 64 65 66 75 6e 20 64 62 78 2d 77 68   ┆k set-marker] 8))  (defun dbx-wh┆
0x0de0…0e00 65 72 65 20 28 26 6f 70 74 69 6f 6e 61 6c 20 62 65 67 69 6e 20 71 75 69 65 74 29 20 22 5c 0a 44   ┆ere (&optional begin quiet) "\ D┆
0x0e00…0e20 69 73 70 6c 61 79 20 64 62 78 27 65 64 20 70 72 6f 67 72 61 6d 20 69 6e 20 6f 74 68 65 72 20 77   ┆isplay dbx'ed program in other w┆
0x0e20…0e40 69 6e 64 6f 77 20 61 6e 64 20 70 6f 69 6e 74 20 6f 75 74 20 77 68 65 72 65 20 79 6f 75 20 61 72   ┆indow and point out where you ar┆
0x0e40…0e60 65 20 6c 6f 6f 6b 69 6e 67 20 61 74 2e 0a 42 45 47 49 4e 20 62 6f 75 6e 64 73 20 74 68 65 20 73   ┆e looking at. BEGIN bounds the s┆
0x0e60…0e80 65 61 72 63 68 2e 20 49 66 20 51 55 49 45 54 2c 20 6a 75 73 74 20 72 65 74 75 72 6e 20 6e 69 6c   ┆earch. If QUIET, just return nil┆
0x0e80…0ea0 20 28 6e 6f 20 65 72 72 6f 72 29 20 69 66 20 66 61 69 6c 2e 22 20 28 69 6e 74 65 72 61 63 74 69   ┆ (no error) if fail." (interacti┆
0x0ea0…0ec0 76 65 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c5 88 c5 c5 19 18 8a c8 0a 0b 0c 23 85 24 00 c9   ┆ve) (byte-code "           # $  ┆
0x0ec0…0ee0 ca cb 21 cc cb 21 5c 22 89 11 88 c9 ca cd 21 cc cd 21 5c 22 89 10 29 88 08 85 2b 00 09 85 58 00   ┆  !  !\"      !  !\"  )   +   X ┆
0x0ee0…0f00 ce cf 08 c5 5c 22 21 88 d0 d1 09 21 21 88 d2 20 88 d3 89 16 06 88 0e 07 86 4d 00 d4 20 89 16 07   ┆    \"!    !!            M      ┆
0x0f00…0f20 88 d5 0e 07 60 70 23 88 d6 cb 21 2a 87 22 20 5b 66 69 6c 65 20 6c 69 6e 65 20 64 62 78 2d 62 72   ┆    `p#   !* " [file line dbx-br┆
0x0f20…0f40 65 61 6b 2d 70 6f 69 6e 74 20 62 65 67 69 6e 20 71 75 69 65 74 20 6e 69 6c 20 6f 76 65 72 6c 61   ┆eak-point begin quiet nil overla┆
0x0f40…0f60 79 2d 61 72 72 6f 77 2d 73 74 72 69 6e 67 20 6f 76 65 72 6c 61 79 2d 61 72 72 6f 77 2d 70 6f 73   ┆y-arrow-string overlay-arrow-pos┆
0x0f60…0f80 69 74 69 6f 6e 20 72 65 2d 73 65 61 72 63 68 2d 62 61 63 6b 77 61 72 64 20 62 75 66 66 65 72 2d   ┆ition re-search-backward buffer-┆
0x0f80…0fa0 73 75 62 73 74 72 69 6e 67 20 6d 61 74 63 68 2d 62 65 67 69 6e 6e 69 6e 67 20 31 20 6d 61 74 63   ┆substring match-beginning 1 matc┆
0x0fa0…0fc0 68 2d 65 6e 64 20 32 20 66 69 6e 64 2d 66 69 6c 65 2d 6f 74 68 65 72 2d 77 69 6e 64 6f 77 20 65   ┆h-end 2 find-file-other-window e┆
0x0fc0…0fe0 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 67 6f 74 6f 2d 6c 69 6e 65 20 73 74 72 69 6e 67   ┆xpand-file-name goto-line string┆
0x0fe0…1000 2d 74 6f 2d 69 6e 74 20 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 6c 69 6e 65 20 22 3d 3e 22 20 6d   ┆-to-int beginning-of-line "=>" m┆
0x1000…1020 61 6b 65 2d 6d 61 72 6b 65 72 20 73 65 74 2d 6d 61 72 6b 65 72 20 6f 74 68 65 72 2d 77 69 6e 64   ┆ake-marker set-marker other-wind┆
0x1020…1040 6f 77 5d 20 31 37 29 29 0a 0a 28 64 65 66 75 6e 20 64 62 78 2d 73 74 6f 70 2d 61 74 20 6e 69 6c   ┆ow] 17))  (defun dbx-stop-at nil┆
0x1040…1060 20 22 5c 0a 53 65 74 20 62 72 65 61 6b 20 70 6f 69 6e 74 20 61 74 20 63 75 72 72 65 6e 74 20 6c   ┆ "\ Set break point at current l┆
0x1060…1080 69 6e 65 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22   ┆ine." (interactive) (byte-code "┆
0x1080…10a0 c4 88 c5 09 21 8c c6 20 88 c7 c8 60 5c 22 54 29 1a 18 c9 0b ca cb 08 cc 0a cd 25 5c 22 2a 87 22   ┆    !      `\"T)          %\"* "┆
0x10a0…10c0 20 5b 66 69 6c 65 2d 6e 61 6d 65 20 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 20 6c 69 6e   ┆ [file-name buffer-file-name lin┆
0x10c0…10e0 65 20 64 62 78 2d 70 72 6f 63 65 73 73 20 6e 69 6c 20 66 69 6c 65 2d 6e 61 6d 65 2d 6e 6f 6e 64   ┆e dbx-process nil file-name-nond┆
0x10e0…1100 69 72 65 63 74 6f 72 79 20 77 69 64 65 6e 20 63 6f 75 6e 74 2d 6c 69 6e 65 73 20 31 20 73 65 6e   ┆irectory widen count-lines 1 sen┆
0x1100…1120 64 2d 73 74 72 69 6e 67 20 63 6f 6e 63 61 74 20 22 73 74 6f 70 20 61 74 20 5c 22 22 20 22 5c 22   ┆d-string concat "stop at \"" "\"┆
0x1120…112d 3a 22 20 22 0a 22 5d 20 31 31 29 29 0a   ┆:" " "] 11)) ┆