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

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

[nongnu] elpa/sly 5966d68: Fix #424: don't byte-compile natively compile


From: ELPA Syncer
Subject: [nongnu] elpa/sly 5966d68: Fix #424: don't byte-compile natively compiled symbols
Date: Wed, 3 Mar 2021 06:57:09 -0500 (EST)

branch: elpa/sly
commit 5966d68727898fa6130fb6bb02208f70aa8d5ce3
Author: Jon Irving <j@lollyshouse.ca>
Commit: GitHub <noreply@github.com>

    Fix #424: don't byte-compile natively compiled symbols
    
    This prevents attempts to byte compile code which has already been
    natively compiled. This copies the workaround of the SLIME commit:
    
    
https://github.com/slime/slime/commit/f135f69c5c97bb1f2456d05ee1e84ad6b4495ca3
    
    * sly.el (sly-byte-compile-hotspots): Skip subrs
---
 sly.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/sly.el b/sly.el
index 36dbceb..8a5273f 100644
--- a/sly.el
+++ b/sly.el
@@ -7425,7 +7425,8 @@ can be found."
 (defun sly-byte-compile-hotspots (syms)
   (mapc (lambda (sym)
           (cond ((fboundp sym)
-                 (unless (byte-code-function-p (symbol-function sym))
+                 (unless (or (byte-code-function-p (symbol-function sym))
+                             (subrp (symbol-function sym)))
                    (sly--byte-compile sym)))
                 (t (error "%S is not fbound" sym))))
         syms))



reply via email to

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