]> git.eshelyaron.com Git - emacs.git/commitdiff
Remove unused function in gdb-mi.el
authorMattias Engdegård <mattiase@acm.org>
Tue, 27 Oct 2020 15:54:38 +0000 (16:54 +0100)
committerMattias Engdegård <mattiase@acm.org>
Tue, 27 Oct 2020 18:10:25 +0000 (19:10 +0100)
* lisp/progmodes/gdb-mi.el (gdb-var-evaluate-expression-handler):
Remove.  (It was left behind in an old code reorganisation.)

lisp/progmodes/gdb-mi.el

index 36e941fa426d113d81d78735daf258886b9ad208..aadfb7c22151e830aa9aa7b30ffa3a688c317f7a 100644 (file)
@@ -1299,16 +1299,6 @@ With arg, enter name of variable to be watched in the minibuffer."
       (raise-frame speedbar-frame))
   (speedbar-timer-fn))
 
-(defun gdb-var-evaluate-expression-handler (varnum changed)
-  (goto-char (point-min))
-  (re-search-forward (concat ".*value=\\(" gdb--string-regexp "\\)")
-                     nil t)
-  (let ((var (assoc varnum gdb-var-list)))
-    (when var
-      (if changed (setcar (nthcdr 5 var) 'changed))
-      (setcar (nthcdr 4 var) (read (match-string 1)))))
-  (gdb-speedbar-update))
-
                                         ; Uses "-var-list-children --all-values".  Needs GDB 6.1 onwards.
 (defun gdb-var-list-children (varnum)
   (gdb-input (concat "-var-update " varnum) 'ignore)