From 91d2d8439bb3a3e5ff739396af44bd0314b6f3c3 Mon Sep 17 00:00:00 2001 From: Andrea Corallo Date: Sun, 27 Aug 2023 16:51:16 +0200 Subject: [PATCH] * Handle missing eln file when trying to disassble (bug#65455) * lisp/emacs-lisp/disass.el (disassemble-internal): Handle missing eln file. --- lisp/emacs-lisp/disass.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/lisp/emacs-lisp/disass.el b/lisp/emacs-lisp/disass.el index 9dd08d00920..859a494a697 100644 --- a/lisp/emacs-lisp/disass.el +++ b/lisp/emacs-lisp/disass.el @@ -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 #" name))) (goto-char (point-min)) (re-search-forward (concat "^.*" (regexp-quote -- 2.39.2