aboutsummaryrefslogtreecommitdiffstats
path: root/src/data.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/data.c')
-rw-r--r--src/data.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/data.c b/src/data.c
index 5fcdda1b6e8..b2e5ffe4eed 100644
--- a/src/data.c
+++ b/src/data.c
@@ -499,7 +499,7 @@ DEFUN ("user-ptrp", Fuser_ptrp, Suser_ptrp, 1, 1, 0,
499#endif 499#endif
500 500
501DEFUN ("subrp", Fsubrp, Ssubrp, 1, 1, 0, 501DEFUN ("subrp", Fsubrp, Ssubrp, 1, 1, 0,
502 doc: /* Return t if OBJECT is a built-in or native compiled Lisp function. 502 doc: /* Return t if OBJECT is a built-in or native-compiled Lisp function.
503 503
504See also `primitive-function-p' and `native-comp-function-p'. */) 504See also `primitive-function-p' and `native-comp-function-p'. */)
505 (Lisp_Object object) 505 (Lisp_Object object)
@@ -1046,7 +1046,7 @@ SUBR must be a built-in function. */)
1046} 1046}
1047 1047
1048DEFUN ("native-comp-function-p", Fnative_comp_function_p, Snative_comp_function_p, 1, 1, 1048DEFUN ("native-comp-function-p", Fnative_comp_function_p, Snative_comp_function_p, 1, 1,
1049 0, doc: /* Return t if the object is native compiled Lisp function, nil otherwise. */) 1049 0, doc: /* Return t if the object is native-compiled Lisp function, nil otherwise. */)
1050 (Lisp_Object object) 1050 (Lisp_Object object)
1051{ 1051{
1052 return NATIVE_COMP_FUNCTIONP (object) ? Qt : Qnil; 1052 return NATIVE_COMP_FUNCTIONP (object) ? Qt : Qnil;
@@ -1054,7 +1054,7 @@ DEFUN ("native-comp-function-p", Fnative_comp_function_p, Snative_comp_function_
1054 1054
1055DEFUN ("subr-native-lambda-list", Fsubr_native_lambda_list, 1055DEFUN ("subr-native-lambda-list", Fsubr_native_lambda_list,
1056 Ssubr_native_lambda_list, 1, 1, 0, 1056 Ssubr_native_lambda_list, 1, 1, 0,
1057 doc: /* Return the lambda list for a native compiled lisp/d 1057 doc: /* Return the lambda list for a native-compiled lisp/d
1058function or t otherwise. */) 1058function or t otherwise. */)
1059 (Lisp_Object subr) 1059 (Lisp_Object subr)
1060{ 1060{