[elpa] externals/realgud-trepan-ni 00cb947 03/25: trepan-ni now handles frame commands...

[Rocky Bernstein]

branch: externals/realgud-trepan-ni
commit 00cb94769294d79fcbf287b99a5feda4b34cb9b8
Author: rocky <address@hidden>
Commit: rocky <address@hidden>

    trepan-ni now handles frame commands...
    
    common.mk shouldn't have been in git
---
 common.mk         | 24 ------------------------
 trepan-ni/init.el | 10 ++++++----
 trepan-ni/main.el |  4 ++--
 3 files changed, 8 insertions(+), 30 deletions(-)

diff --git a/common.mk b/common.mk
deleted file mode 100644
index de60b93..0000000
--- a/common.mk
+++ /dev/null
@@ -1,24 +0,0 @@
-MOSTLYCLEANFILES = *.elc
-EMACSLOADPATH=:/home/rocky/.emacs.d/elpa/test-simple-20170527.1532/:/home/rocky/.emacs.d/elpa/realgud-20180711.253/:/home/rocky/.emacs.d/elpa/load-relative-20170526.1010/:/home/rocky/.emacs.d/elpa/loc-changes-20160801.1708/
-
-short:
-       $(MAKE) 2>&1 >/dev/null | ruby $(top_srcdir)/make-check-filter.rb
-
-%.short:
-       $(MAKE) $(@:.short=) 2>&1 >/dev/null
-
-# This is the default rule, but we need to include an EMACLOADPATH
-.el.elc:
-       if test "$(EMACS)" != "no"; then \
-         am__dir=. am__subdir_includes=''; \
-         case $@ in */*) \
-           am__dir=`echo '$@' | sed 's,/[^/]*$$,,'`; \
-           am__subdir_includes="-L $$am__dir -L $(srcdir)/$$am__dir"; \
-         esac; \
-         test -d "$$am__dir" || $(MKDIR_P) "$$am__dir" || exit 1; \
-         EMACSLOADPATH=$(EMACSLOADPATH) $(EMACS) --batch \
-           $(AM_ELCFLAGS) $(ELCFLAGS) \
-           $$am__subdir_includes -L $(builddir) -L $(srcdir) \
-           --eval "(defun byte-compile-dest-file (f) \"address@hidden")" \
-           --eval "(unless (byte-compile-file \"$<\") (kill-emacs 1))"; \
-       else :; fi
diff --git a/trepan-ni/init.el b/trepan-ni/init.el
index af6b6c4..9b6ca95 100644
--- a/trepan-ni/init.el
+++ b/trepan-ni/init.el
@@ -35,7 +35,7 @@ realgud-loc-pat struct")
 (setf (gethash "loc" realgud:trepan-ni-pat-hash)
       (make-realgud-loc-pat
        :regexp (format
-               "\\(?:%s\\)*\\(?:break\\|exception\\) in %s:%s"
+               "\\(?:%s\\)*\\(?:break\\|exception\\|frame change\\) in %s:%s"
                realgud:js-term-escape "\\([^:]+\\)"
                realgud:regexp-captured-num)
        :file-group 1
@@ -176,11 +176,13 @@ realgud-loc-pat struct")
 (setf (gethash "step"       realgud:trepan-ni-command-hash) "step")
 (setf (gethash "next"       realgud:trepan-ni-command-hash) "next")
 
+(setf (gethash "up"         realgud:trepan-ni-command-hash) "up(%p)")
+(setf (gethash "down"       realgud:trepan-ni-command-hash) "down(%p)")
+(setf (gethash "frame"      realgud:trepan-ni-command-hash) "frame(%p)")
+
 ;; Unsupported features:
 (setf (gethash "jump"       realgud:trepan-ni-command-hash) 
"*not-implemented*")
-(setf (gethash "up"         realgud:trepan-ni-command-hash) 
"*not-implemented*")
-(setf (gethash "down"       realgud:trepan-ni-command-hash) 
"*not-implemented*")
-(setf (gethash "frame"      realgud:trepan-ni-command-hash) 
"*not-implemented*")
+
 
 (setf (gethash "trepan-ni" realgud-command-hash) 
realgud:trepan-ni-command-hash)
 (setf (gethash "trepan-ni" realgud-pat-hash) realgud:trepan-ni-pat-hash)
diff --git a/trepan-ni/main.el b/trepan-ni/main.el
index 3c63f3f..2d4a050 100644
--- a/trepan-ni/main.el
+++ b/trepan-ni/main.el
@@ -13,7 +13,7 @@
 ;; You should have received a copy of the GNU General Public License
 ;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
 
-;;  `realgud:trepan-ni' Main interface to "node inspect" debugger via Emacs
+;;  `realgud:trepan-ni' Main interface to "trepan-ni" debugger via Emacs
 
 (require 'cl-lib)
 (require 'load-relative)
@@ -32,7 +32,7 @@
 ;;
 
 (defcustom realgud:trepan-ni-command-name
-  "node inspect"
+  "trepan-ni"
   "File name for executing the Javascript debugger and command options.
 This should be an executable on your path, or an absolute file name."
   :type 'string