aboutsummaryrefslogtreecommitdiffstats
path: root/src/bytecode.c
diff options
context:
space:
mode:
authorStefan Monnier2024-05-28 20:49:55 -0400
committerStefan Monnier2024-05-28 20:53:33 -0400
commit3480ca83510f1ad6026971c9031e2c65540d402a (patch)
tree9227d714b39f0df11174cf3401f195d7089ade57 /src/bytecode.c
parentfde8dc9287c0a81c6b942b5cf445f8f7aeba1207 (diff)
downloademacs-3480ca83510f1ad6026971c9031e2c65540d402a.tar.gz
emacs-3480ca83510f1ad6026971c9031e2c65540d402a.zip
Rename `SUBR_NATIVE_COMPILED` to `NATIVE_COMP_FUNCTION` (bug#71123)
Keep the name consistent with the naming used in the ELisp world. * src/pdumper.c (dump_object_emacs_ptr, dump_do_fixup): * src/eval.c (eval_sub, funcall_general, funcall_lambda): * src/alloc.c (CHECK_ALLOCATED_AND_LIVE_SYMBOL, survives_gc_p): * src/data.c (Fcl_type_of, Ffset, Fnative_comp_function_p) (Fsubr_native_lambda_list, Finteractive_form): * src/comp.c (check_comp_unit_relocs): * src/bytecode.c (exec_byte_code): * src/lisp.h (NATIVE_COMP_FUNCTIONP, NATIVE_COMP_FUNCTION_DYNP): Rename from `SUBR_NATIVE_COMPILEDP` and `SUBR_NATIVE_COMPILED_DYNP`.
Diffstat (limited to 'src/bytecode.c')
-rw-r--r--src/bytecode.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/bytecode.c b/src/bytecode.c
index 03443ed54ab..75f9f1d0ac7 100644
--- a/src/bytecode.c
+++ b/src/bytecode.c
@@ -808,7 +808,7 @@ exec_byte_code (Lisp_Object fun, ptrdiff_t args_template,
808 } 808 }
809 809
810 Lisp_Object val; 810 Lisp_Object val;
811 if (SUBRP (call_fun) && !SUBR_NATIVE_COMPILED_DYNP (call_fun)) 811 if (SUBRP (call_fun) && !NATIVE_COMP_FUNCTION_DYNP (call_fun))
812 val = funcall_subr (XSUBR (call_fun), call_nargs, call_args); 812 val = funcall_subr (XSUBR (call_fun), call_nargs, call_args);
813 else 813 else
814 val = funcall_general (original_fun, call_nargs, call_args); 814 val = funcall_general (original_fun, call_nargs, call_args);