diff options
| author | Stefan Monnier | 2024-03-24 18:32:25 -0400 |
|---|---|---|
| committer | Stefan Monnier | 2024-04-28 11:58:05 -0400 |
| commit | 2fa839c1886acd4a7b6c25c50877534fe1d669bb (patch) | |
| tree | 9db25d761b2de896a902ccae32dc02c7a9dc56f4 /src/comp.c | |
| parent | 1e931f1c3db1588ba402d0eab60f03cc036f814a (diff) | |
| download | emacs-2fa839c1886acd4a7b6c25c50877534fe1d669bb.tar.gz emacs-2fa839c1886acd4a7b6c25c50877534fe1d669bb.zip | |
(COMPILED): Rename to CLOSURE
In preparation for the use of `PVEC_COMPILED` objects for
interpreted functions, rename them to use a more neutral name.
* src/lisp.h (enum pvec_type): Rename `PVEC_COMPILED` to `PVEC_CLOSURE`.
(enum Lisp_Compiled): Use `CLOSURE_` prefix i.s.o `COMPILED_`.
Also use `CODE` rather than `BYTECODE`.
(CLOSUREP): Rename from `COMPILEDP`.
(enum Lisp_Closure): Rename from `Lisp_Compiled`.
* src/alloc.c, src/bytecode.c, src/comp.c, src/data.c, src/eval.c,
* src/fns.c, src/lisp.h, src/lread.c, src/pdumper.c, src/print.c,
* src/profiler.c: Rename all uses accordingly.
* src/.gdbinit (xclosure): Rename from `xcompiled`.
(xcompiled): New obsolete alias.
(xpr): Adjust accordingly. Also adjust to new PVEC_CLOSURE tag name.
Diffstat (limited to 'src/comp.c')
| -rw-r--r-- | src/comp.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/comp.c b/src/comp.c index 3ac6896aee1..4e779cdf898 100644 --- a/src/comp.c +++ b/src/comp.c | |||
| @@ -5199,7 +5199,7 @@ maybe_defer_native_compilation (Lisp_Object function_name, | |||
| 5199 | if (!native_comp_jit_compilation | 5199 | if (!native_comp_jit_compilation |
| 5200 | || noninteractive | 5200 | || noninteractive |
| 5201 | || !NILP (Vpurify_flag) | 5201 | || !NILP (Vpurify_flag) |
| 5202 | || !COMPILEDP (definition) | 5202 | || !CLOSUREP (definition) |
| 5203 | || !STRINGP (Vload_true_file_name) | 5203 | || !STRINGP (Vload_true_file_name) |
| 5204 | || !suffix_p (Vload_true_file_name, ".elc") | 5204 | || !suffix_p (Vload_true_file_name, ".elc") |
| 5205 | || !NILP (Fgethash (Vload_true_file_name, V_comp_no_native_file_h, Qnil))) | 5205 | || !NILP (Fgethash (Vload_true_file_name, V_comp_no_native_file_h, Qnil))) |