[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))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [nongnu] elpa/sly 5966d68: Fix #424: don't byte-compile natively compiled symbols,
ELPA Syncer <=