Mercurial > emacs
changeset 39252:8bf84df37c90
(dbx) <gud-dbx-use-stopformat-p>: Move this case into the
`t' branch of `cond', since Irix 6.1 and up is a special case of
the standard dbx interface.
| author | Eli Zaretskii <eliz@gnu.org> |
|---|---|
| date | Tue, 11 Sep 2001 18:28:22 +0000 |
| parents | 2b9c2a181f79 |
| children | 81d50e5eaf23 |
| files | lisp/gud.el |
| diffstat | 1 files changed, 4 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/gud.el Tue Sep 11 16:11:08 2001 +0000 +++ b/lisp/gud.el Tue Sep 11 18:28:22 2001 +0000 @@ -1046,14 +1046,14 @@ ;; Make dbx give out the source location info that we need. (process-send-string (get-buffer-process gud-comint-buffer) "printf \"\032\032%1d:\",(int)$curline;file\n")) - (gud-dbx-use-stopformat-p - (process-send-string (get-buffer-process gud-comint-buffer) - "set $stopformat=1\n")) (t (gud-def gud-up "up %p" "<" "Up (numeric arg) stack frames.") (gud-def gud-down "down %p" ">" "Down (numeric arg) stack frames.") (gud-def gud-break "file \"%d%f\"\nstop at %l" - "\C-b" "Set breakpoint at current line."))) + "\C-b" "Set breakpoint at current line.") + (if gud-dbx-use-stopformat-p + (process-send-string (get-buffer-process gud-comint-buffer) + "set $stopformat=1\n")))) (gud-def gud-remove "clear %l" "\C-d" "Remove breakpoint at current line") (gud-def gud-step "step %p" "\C-s" "Step one line with display.")