]> git.eshelyaron.com Git - emacs.git/commitdiff
* Handle missing eln file when trying to disassble (bug#65455)
authorAndrea Corallo <acorallo@gnu.org>
Sun, 27 Aug 2023 14:51:16 +0000 (16:51 +0200)
committerAndrea Corallo <acorallo@gnu.org>
Sun, 27 Aug 2023 15:04:08 +0000 (17:04 +0200)
* lisp/emacs-lisp/disass.el (disassemble-internal): Handle missing
eln file.

lisp/emacs-lisp/disass.el

index 9dd08d00920053b2473c35e348c1bd084315f2eb..859a494a6979ecdae37c22b924eb96801861f207 100644 (file)
@@ -89,8 +89,10 @@ redefine OBJECT if it is a symbol."
                  (subr-native-elisp-p obj))
             (progn
               (require 'comp)
-              (call-process "objdump" nil (current-buffer) t "-S"
-                            (native-comp-unit-file (subr-native-comp-unit obj)))
+              (let ((eln (native-comp-unit-file (subr-native-comp-unit obj))))
+                (if (file-exists-p eln)
+                    (call-process "objdump" nil (current-buffer) t "-S" eln)
+                  (error "Missing eln file for #<subr %s>" name)))
               (goto-char (point-min))
               (re-search-forward (concat "^.*"
                                          (regexp-quote