fix subr-native-elisp-p predicate name

1 files changed, 2 insertions, 2 deletions

diff --git a/src/data.c b/src/data.c
index 70068c30a71..2a32d47c49b 100644
--- a/src/data.c
+++ b/src/data.c
@@ -865,7 +865,7 @@ SUBR must be a built-in function.  */)
 }
 
 #ifdef HAVE_NATIVE_COMP
-DEFUN ("subr-native-elispp", Fsubr_native_elispp, Ssubr_native_elispp, 1, 1, 0,
+DEFUN ("subr-native-elisp-p", Fsubr_native_elisp_p, Ssubr_native_elisp_p, 1, 1, 0,
        doc: /* Return t if the subr is native compiled elisp,
 nil otherwise.  */)
   (Lisp_Object subr)
@@ -3995,7 +3995,7 @@ syms_of_data (void)
   defsubr (&Ssubr_arity);
   defsubr (&Ssubr_name);
 #ifdef HAVE_NATIVE_COMP
-  defsubr (&Ssubr_native_elispp);
+  defsubr (&Ssubr_native_elisp_p);
 #endif
 #ifdef HAVE_MODULES
   defsubr (&Suser_ptrp);