branch: externals/realgud
commit 53b0c1acc0d9c8dd99cfd57157a24eaf45f1e5ba
Author: rocky <ro...@gnu.org>
Commit: rocky <ro...@gnu.org>
Be Explicit about eval command ...
In debuggers that have it
---
realgud.el | 2 +-
realgud/debugger/bashdb/init.el | 3 ++-
realgud/debugger/kshdb/init.el | 1 +
realgud/debugger/trepan.pl/init.el | 1 +
realgud/debugger/trepan2/init.el | 1 +
realgud/debugger/trepan3k/init.el | 1 +
realgud/debugger/zshdb/init.el | 1 +
7 files changed, 8 insertions(+), 2 deletions(-)
diff --git a/realgud.el b/realgud.el
index c9cb9a8..6ac48bc 100644
--- a/realgud.el
+++ b/realgud.el
@@ -68,7 +68,7 @@
;; Press C-x C-e at the end of the next line configure the program in
;; for building via "make" to get set up.
-;; (compile (format "EMACSLOADPATH=:%s:%s ./autogen.sh" (file-name-directory
(locate-library "test-simple.elc")) (file-name-directory (locate-library
"load-relative.elc")) (file-name-directory (locate-library "loc-changes.elc"))))
+;; (compile (format "EMACSLOADPATH=:%s:%s:%s ./autogen.sh"
(file-name-directory (locate-library "test-simple.elc")) (file-name-directory
(locate-library "load-relative.elc")) (file-name-directory (locate-library
"loc-changes.elc"))))
(require 'load-relative)
diff --git a/realgud/debugger/bashdb/init.el b/realgud/debugger/bashdb/init.el
index 7eead68..e527b2d 100644
--- a/realgud/debugger/bashdb/init.el
+++ b/realgud/debugger/bashdb/init.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2015-2016 Free Software Foundation, Inc
+;; Copyright (C) 2015-2017 Free Software Foundation, Inc
;; Author: Rocky Bernstein <ro...@gnu.org>
@@ -100,6 +100,7 @@ realgud-loc-pat struct")
(setf (gethash "bashdb" realgud-command-hash) realgud:bashdb-command-hash)
(setf (gethash "clear" realgud:bashdb-command-hash) "clear %l")
+(setf (gethash "eval" realgud:bashdb-command-hash) "eval %s")
(setf (gethash "quit" realgud:bashdb-command-hash) "quit")
(setf (gethash "until" realgud:bashdb-command-hash) "continue %l")
diff --git a/realgud/debugger/kshdb/init.el b/realgud/debugger/kshdb/init.el
index e6f6f74..6ce52a4 100644
--- a/realgud/debugger/kshdb/init.el
+++ b/realgud/debugger/kshdb/init.el
@@ -121,5 +121,6 @@ realgud-loc-pat struct")
(setf (gethash "kshdb" realgud-pat-hash) realgud:kshdb-pat-hash)
(setf (gethash "clear" realgud:kshdb-command-hash) "clear %l")
+(setf (gethash "eval" realgud:kshdb-command-hash) "eval %s")
(provide-me "realgud:kshdb-")
diff --git a/realgud/debugger/trepan.pl/init.el
b/realgud/debugger/trepan.pl/init.el
index 2865180..f3bf383 100644
--- a/realgud/debugger/trepan.pl/init.el
+++ b/realgud/debugger/trepan.pl/init.el
@@ -269,6 +269,7 @@ backtrace listing.")
the trepanpl command to use, like 'quit!'")
(setf (gethash "break" realgud:trepanpl-command-hash) "break %x %l")
+(setf (gethash "eval" realgud:trepanpl-command-hash) "eval %s")
(setf (gethash "quit" realgud:trepanpl-command-hash) "quit!")
(setf (gethash "until" realgud:trepanpl-command-hash) "continue %l")
(setf (gethash realgud:trepanpl-debugger-name
diff --git a/realgud/debugger/trepan2/init.el b/realgud/debugger/trepan2/init.el
index 1948a68..af4f49f 100644
--- a/realgud/debugger/trepan2/init.el
+++ b/realgud/debugger/trepan2/init.el
@@ -107,6 +107,7 @@ realgud-loc-pat struct")
"Hash key is command name like 'shell' and the value is
the trepan2 command to use, like 'python'")
+(setf (gethash "eval" realgud:trepan2-command-hash) "eval %s")
(setf (gethash "shell" realgud:trepan2-command-hash) "python")
(setf (gethash "until" realgud:trepan2-command-hash) "continue %l")
diff --git a/realgud/debugger/trepan3k/init.el
b/realgud/debugger/trepan3k/init.el
index c88b271..be4b1f1 100644
--- a/realgud/debugger/trepan3k/init.el
+++ b/realgud/debugger/trepan3k/init.el
@@ -113,6 +113,7 @@ realgud-loc-pat struct")
"Hash key is command name like 'shell' and the value is
the trepan3k command to use, like 'python'")
+(setf (gethash "eval" realgud:trepan3k-command-hash) "eval %s")
(setf (gethash "shell" realgud:trepan3k-command-hash) "python")
(setf (gethash "until" realgud-command-hash) "continue %l")
diff --git a/realgud/debugger/zshdb/init.el b/realgud/debugger/zshdb/init.el
index 90af96b..3fac621 100644
--- a/realgud/debugger/zshdb/init.el
+++ b/realgud/debugger/zshdb/init.el
@@ -96,6 +96,7 @@ realgud-loc-pat struct")
(setf (gethash "zshdb" realgud-command-hash) realgud:zshdb-command-hash)
(setf (gethash "clear" realgud:zshdb-command-hash) "clear %l")
+(setf (gethash "eval" realgud:zshdb-command-hash) "eval %s")
(setf (gethash "quit" realgud:zshdb-command-hash) "quit")
(setf (gethash "until" realgud:zshdb-command-hash) "continue %l")
