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

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

[elpa] externals/compat 93dc61d64f: Simplify subr-primitive-p definition


From: ELPA Syncer
Subject: [elpa] externals/compat 93dc61d64f: Simplify subr-primitive-p definition
Date: Sun, 17 Jul 2022 15:57:22 -0400 (EDT)

branch: externals/compat
commit 93dc61d64f1f1fcbf90c1eaae4de3d5d289613e2
Author: Philip Kaludercic <philipk@posteo.net>
Commit: Philip Kaludercic <philipk@posteo.net>

    Simplify subr-primitive-p definition
    
    Thanks to Stefan Monnier for the tip.
---
 compat-28.el | 6 +-----
 1 file changed, 1 insertion(+), 5 deletions(-)

diff --git a/compat-28.el b/compat-28.el
index c7e03eca83..dd4ec26074 100644
--- a/compat-28.el
+++ b/compat-28.el
@@ -447,13 +447,9 @@ not a list, return a one-element list containing OBJECT."
       object
     (list object)))
 
-
-(declare-function subr-native-elisp-p nil (object))
 (compat-defun subr-primitive-p (object)
   "Return t if OBJECT is a built-in primitive function."
-  (and (subrp object)
-       (not (and (fboundp 'subr-native-elisp-p)
-                (subr-native-elisp-p object)))))
+  (subrp object))
 
 ;;;; Defined in subr-x.el
 



reply via email to

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