mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-23 07:19:15 +00:00
Code Issues Releases Activity

Protect against errors in gdb-mi.el handlers

Browse Source 
* lisp/progmodes/gdb-mi.el (gdb-handle-reply): Handle errors
in 'handler-function' so the cleanup code after it runs
safely.  (Bug#39178)
This commit is contained in:
Yuan Fu 2019-10-07 18:47:54 -04:00 committed by Eli Zaretskii
parent baceb8e84d
commit 2b1e18ae85
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/progmodes/gdb-mi.el
View File

@ -324,7 +324,10 @@ in `gdb-handler-list' and clears all pending handlers invalidated
by the reception of this reply."
(let ((handler-function (gdb-get-handler-function token-number)))
(when handler-function
(funcall handler-function)
(condition-case err
;; protect against errors in handler-function
(funcall handler-function)
(error (message (error-message-string err))))
(gdb-delete-handler token-number))))
(defun gdb-remove-all-pending-triggers ()