diff options
| author | Nick Roberts | 2009-08-13 13:22:11 +0000 |
|---|---|---|
| committer | Nick Roberts | 2009-08-13 13:22:11 +0000 |
| commit | 79a1c8a97058e8542a2fdbe3aabc4c513b79e46f (patch) | |
| tree | 1870dc585da277411b2fbb344d18612d6cfb0265 | |
| parent | c7baf7e99facdb2510a5031e0d40dd684c85de36 (diff) | |
| download | emacs-79a1c8a97058e8542a2fdbe3aabc4c513b79e46f.tar.gz emacs-79a1c8a97058e8542a2fdbe3aabc4c513b79e46f.zip | |
(gdb-inferior-io-mode): Use start-process to
create buffer with a pty but no process so that GDB can make the
inferior the controlling process.
| -rw-r--r-- | lisp/progmodes/gdb-mi.el | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/progmodes/gdb-mi.el b/lisp/progmodes/gdb-mi.el index 91e9f685d9e..4784eea0942 100644 --- a/lisp/progmodes/gdb-mi.el +++ b/lisp/progmodes/gdb-mi.el | |||
| @@ -1432,11 +1432,11 @@ DOC is an optional documentation string." | |||
| 1432 | (define-derived-mode gdb-inferior-io-mode comint-mode "Inferior I/O" | 1432 | (define-derived-mode gdb-inferior-io-mode comint-mode "Inferior I/O" |
| 1433 | "Major mode for gdb inferior-io." | 1433 | "Major mode for gdb inferior-io." |
| 1434 | :syntax-table nil :abbrev-table nil | 1434 | :syntax-table nil :abbrev-table nil |
| 1435 | ;; We want to use comint because it has various nifty and familiar | 1435 | ;; We want to use comint because it has various nifty and familiar features. |
| 1436 | ;; features. We don't need a process, but comint wants one, so create | 1436 | (start-process "gdb-inferior" |
| 1437 | ;; a dummy one. | 1437 | ;; (concat "*input/output of " (gdb-get-target-string) "*") |
| 1438 | (make-comint-in-buffer | 1438 | (current-buffer) |
| 1439 | "gdb-inferior" (current-buffer) "sleep" nil "1000000000")) | 1439 | nil)) |
| 1440 | 1440 | ||
| 1441 | (defun gdb-inferior-filter (proc string) | 1441 | (defun gdb-inferior-filter (proc string) |
| 1442 | (unless (string-equal string "") | 1442 | (unless (string-equal string "") |