Commit 2863ab16 authored by Nick Roberts's avatar Nick Roberts
Browse files

(gdb-ready): New variable.

(gdb): Set it to nil.  Set gud-running to nil here...
(gud-common-init): ...instead of here.
parent 1c9e363a
......@@ -104,6 +104,8 @@ If SOFT is non-nil, returns nil if the symbol doesn't already exist."
"Non-nil if debugged program is running.
Used to grey out relevant toolbar icons.")
(defvar gdb-ready nil)
;; Use existing Info buffer, if possible.
(defun gud-goto-info ()
"Go to relevant Emacs info node."
......@@ -764,6 +766,8 @@ session."
(setq comint-prompt-regexp "^(.*gdb[+]?) *")
(setq paragraph-start comint-prompt-regexp)
(setq gdb-first-prompt t)
(setq gud-running nil)
(setq gdb-ready nil)
(setq gud-filter-pending-text nil)
(run-hooks 'gdb-mode-hook))
......@@ -2519,7 +2523,6 @@ comint mode, which see."
(and file-word (file-name-nondirectory file))))
(set (make-local-variable 'gud-marker-filter) marker-filter)
(if find-file (set (make-local-variable 'gud-find-file) find-file))
(setq gud-running nil)
(setq gud-last-last-frame nil)
(set-process-filter (get-buffer-process (current-buffer)) 'gud-filter)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment