[PATCH] Add new customizable variable `gdb-use-io-buffer'.

[StrawberryTea]

* lisp/progmodes/gdb-mi.el (gdb-use-io-buffer): Don't create IO
buffer if `gdb-use-io-buffer'.
(gdb-use-io-buffer): New user option.
---
 lisp/progmodes/gdb-mi.el | 16 +++++++++++++---
 1 file changed, 13 insertions(+), 3 deletions(-)

diff --git a/lisp/progmodes/gdb-mi.el b/lisp/progmodes/gdb-mi.el
index a1091de43e9..00cb1013f7b 100644
--- a/lisp/progmodes/gdb-mi.el
+++ b/lisp/progmodes/gdb-mi.el
@@ -1098,9 +1098,10 @@ detailed description of this mode.
                      (if gdb-debuginfod-enable "on" "off"))
              'gdb-debuginfod-message)

-  (gdb-get-buffer-create 'gdb-inferior-io)
-  (gdb-clear-inferior-io)
-  (gdb-inferior-io--init-proc (get-process "gdb-inferior"))
+  (when gdb-use-io-buffer
+    (gdb-get-buffer-create 'gdb-inferior-io)
+    (gdb-clear-inferior-io)
+    (gdb-inferior-io--init-proc (get-process "gdb-inferior")))

   (when (eq system-type 'windows-nt)
     ;; Don't create a separate console window for the debuggee.
@@ -1828,6 +1829,15 @@ this trigger is subscribed to `gdb-buf-publisher' and 
called with
   :group 'gdb
   :version "25.1")

+(defcustom gdb-use-io-buffer t
+  "Non-nil means to split the program's I/O from the GDB buffer.
+
+If t, create the `gdb-inferior-io' buffer and redirect the
+program's I/O to it."
+  :type 'boolean
+  :group 'gdb
+  :version "30.1")
+
 (defun gdb-inferior-filter (proc string)
   (unless (string-equal string "")
     (let (buf)
--
2.41.0