>From 30217881358cb685d8f1327dfb476f765a0d48a8 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Gr=C3=A9goire=20Jadi?= <gregoire.jadi@gmail.com>
Date: Tue, 25 Jun 2013 18:40:07 +0200
Subject: [PATCH] * lisp/progmodes/gdb-mi.el (gdb-io-stop): Temporarily
 workaround for bug #14597.

Send raw "C-z" via `gdb-inferior-io' buffer instead of sending a signal.
---
 lisp/progmodes/gdb-mi.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/lisp/progmodes/gdb-mi.el b/lisp/progmodes/gdb-mi.el
index 0b52302..a597a32 100644
--- a/lisp/progmodes/gdb-mi.el
+++ b/lisp/progmodes/gdb-mi.el
@@ -1646,8 +1646,9 @@ this trigger is subscribed to `gdb-buf-publisher' and called with
 (defun gdb-io-stop ()
   "Stop the program being debugged."
   (interactive)
-  (stop-process
-   (get-buffer-process gud-comint-buffer) comint-ptyp))
+  (process-send-string (get-buffer-process
+                        (gdb-get-buffer-create 'gdb-inferior-io))
+                       (kbd "C-z")))
 
 (defun gdb-io-eof ()
   "Send end-of-file to the program being debugged."
-- 
1.8.0.2722.gc0242e5