From 79a1c8a97058e8542a2fdbe3aabc4c513b79e46f Mon Sep 17 00:00:00 2001 From: Nick Roberts Date: Thu, 13 Aug 2009 13:22:11 +0000 Subject: [PATCH] (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. --- lisp/progmodes/gdb-mi.el | 10 +++++----- 1 file 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." (define-derived-mode gdb-inferior-io-mode comint-mode "Inferior I/O" "Major mode for gdb inferior-io." :syntax-table nil :abbrev-table nil - ;; We want to use comint because it has various nifty and familiar - ;; features. We don't need a process, but comint wants one, so create - ;; a dummy one. - (make-comint-in-buffer - "gdb-inferior" (current-buffer) "sleep" nil "1000000000")) + ;; We want to use comint because it has various nifty and familiar features. + (start-process "gdb-inferior" +;; (concat "*input/output of " (gdb-get-target-string) "*") + (current-buffer) + nil)) (defun gdb-inferior-filter (proc string) (unless (string-equal string "") -- 2.39.2