emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/beardbolt 73dcaca98d 177/323: Remove unneeded variables


From: ELPA Syncer
Subject: [elpa] externals/beardbolt 73dcaca98d 177/323: Remove unneeded variables
Date: Thu, 9 Mar 2023 10:58:29 -0500 (EST)

branch: externals/beardbolt
commit 73dcaca98d9b28e11d13b16fd086d8d725b2f6cf
Author: Jay Kamat <jaygkamat@gmail.com>
Commit: Jay Kamat <jaygkamat@gmail.com>

    Remove unneeded variables
---
 README.org |  2 ++
 rmsbolt.el | 16 +++++++---------
 2 files changed, 9 insertions(+), 9 deletions(-)

diff --git a/README.org b/README.org
index 9ffeae6c85..82cd4d752c 100644
--- a/README.org
+++ b/README.org
@@ -101,6 +101,8 @@ The main knobs are described in the full documentation.
 [[https://i.imgur.com/cMYfkGx.gif][https://i.imgur.com/cMYfkGx.gif]]
 ** Java
 [[https://i.imgur.com/KkWEMMj.gif][https://i.imgur.com/KkWEMMj.gif]]
+** Go
+[[https://gitlab.com/jgkamat/rmsbolt/uploads/4ca143ac99f33880dbde000d71ff3763/rmsbolt-go-2.gif][https://gitlab.com/jgkamat/rmsbolt/uploads/4ca143ac99f33880dbde000d71ff3763/rmsbolt-go-2.gif]]
 ** PHP
 [[https://i.imgur.com/xBfzaK9.gif][https://i.imgur.com/xBfzaK9.gif]]
 ** Pony
diff --git a/rmsbolt.el b/rmsbolt.el
index 7ffcb2fbda..d220d6f58b 100644
--- a/rmsbolt.el
+++ b/rmsbolt.el
@@ -25,8 +25,8 @@
 ;; RMSBolt is a package to provide assembly or bytecode output for a source
 ;; code input file.
 ;;
-;; It currently supports: C/C++, OCaml, Haskell, Python, Java, PHP, D, Pony,
-;; Zig, Emacs Lisp, and (limited) Common Lisp.
+;; It currently supports: C/C++, OCaml, Haskell, Python, Java, Go, PHP, D,
+;; Pony, Zig, Emacs Lisp, and (limited) Common Lisp.
 ;;
 ;; Adding support for more languages, if they have an easy manual compilation
 ;; path from source->assembly/bytecode with debug information, should be much
@@ -493,14 +493,12 @@ Return value is quoted for passing to the shell."
   "Process a compile command for go."
   (rmsbolt--with-files
    src-buffer
-   (let* ((asm-format (buffer-local-value 'rmsbolt-asm-format src-buffer))
-          (disass (buffer-local-value 'rmsbolt-disassemble src-buffer))
-          (cmd (buffer-local-value 'rmsbolt-command src-buffer))
+   (let* ((cmd (buffer-local-value 'rmsbolt-command src-buffer))
           (cmd (mapconcat #'identity
                           (list cmd
-                               "tool" "compile"
+                                "tool" "compile"
                                 "-S"
-                               "-o" output-filename
+                                "-o" output-filename
                                 src-filename)
                           " ")))
      cmd)))
@@ -1189,7 +1187,7 @@ Argument ASM-LINES input lines."
      (t
       (rmsbolt--process-src-asm-lines src-buffer asm-lines)))))
 
-(cl-defun rmsbolt--process-go-asm-lines (src-buffer asm-lines)
+(cl-defun rmsbolt--process-go-asm-lines (_src-buffer asm-lines)
   (let ((source-linum nil)
         (result nil))
     (dolist (line asm-lines)
@@ -1413,7 +1411,7 @@ Are you running two compilations at the same time?"))
                  (mapconcat #'identity
                             (list cmd
                                   "&&"
-                                 "go" "tool"
+                                  "go" "tool"
                                   "objdump" (rmsbolt-output-filename 
src-buffer)
                                   ">" (rmsbolt-output-filename src-buffer t))
                             " ")))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]