diff options
author | Andrea Corallo <akrl@sdf.org> | 2021-03-31 14:49:36 +0200 |
---|---|---|
committer | Andrea Corallo <akrl@sdf.org> | 2021-03-31 19:56:10 +0200 |
commit | 613caa9527ef56fb9b810d2b9478cbe9784baca0 (patch) | |
tree | f8728f743ec52298e8680355eb0f6a8f0bf46134 /src/lread.c | |
parent | 515378434a44b9979e8c8a6e04203695095bdc40 (diff) | |
download | emacs-613caa9527ef56fb9b810d2b9478cbe9784baca0.tar.gz emacs-613caa9527ef56fb9b810d2b9478cbe9784baca0.tar.bz2 emacs-613caa9527ef56fb9b810d2b9478cbe9784baca0.zip |
Do not defer compilation when bytecode is explicitly requested (bug#46617)
* src/comp.c (maybe_defer_native_compilation): Check if the file
is registered in 'V_comp_no_native_file_h'.
(syms_of_comp): 'V_comp_no_native_file_h' new global.
* src/lread.c (maybe_swap_for_eln): Register files in
'V_comp_no_native_file_h'.
* lisp/faces.el (tty-run-terminal-initialization): Do not
explicitly load .elc file to not exclude .eln being loaded in
place.
Diffstat (limited to 'src/lread.c')
-rw-r--r-- | src/lread.c | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/src/lread.c b/src/lread.c index e8c257a13cc..ec6f09238ba 100644 --- a/src/lread.c +++ b/src/lread.c @@ -1656,6 +1656,12 @@ maybe_swap_for_eln (bool no_native, Lisp_Object *filename, int *fd, struct stat eln_st; if (no_native + || load_no_native) + Fputhash (*filename, Qt, V_comp_no_native_file_h); + else + Fremhash (*filename, V_comp_no_native_file_h); + + if (no_native || load_no_native || !suffix_p (*filename, ".elc")) return; |