diff options
| author | Andrea Corallo <akrl@sdf.org> | 2019-11-17 19:25:21 +0100 |
|---|---|---|
| committer | Andrea Corallo <akrl@sdf.org> | 2020-01-01 11:38:07 +0100 |
| commit | 41e5c9400cd9eeeecff2262907c09c3b10a5cde7 (patch) | |
| tree | 05a242c9f676cf3e860dca63fa6f3cb81c834f37 /src/comp.c | |
| parent | 3850be836ec7223c895901dd21f2a4e429314b94 (diff) | |
| download | emacs-41e5c9400cd9eeeecff2262907c09c3b10a5cde7.tar.gz emacs-41e5c9400cd9eeeecff2262907c09c3b10a5cde7.tar.bz2 emacs-41e5c9400cd9eeeecff2262907c09c3b10a5cde7.zip | |
require advice when compiling or loading
Diffstat (limited to 'src/comp.c')
| -rw-r--r-- | src/comp.c | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/src/comp.c b/src/comp.c index ad669a5dafb..251ba242d43 100644 --- a/src/comp.c +++ b/src/comp.c @@ -3052,6 +3052,8 @@ DEFUN ("comp--compile-ctxt-to-file", Fcomp__compile_ctxt_to_file, { CHECK_STRING (ctxtname); + Frequire (Qadvice, Qnil, Qnil); + gcc_jit_context_set_int_option (comp.ctxt, GCC_JIT_INT_OPTION_OPTIMIZATION_LEVEL, SPEED); @@ -3327,6 +3329,8 @@ DEFUN ("native-elisp-load", Fnative_elisp_load, Snative_elisp_load, 1, 1, 0, { CHECK_STRING (file); + Frequire (Qadvice, Qnil, Qnil); + Vnative_load_history = Fcons (file, Vnative_load_history); dynlib_handle_ptr handle = dynlib_open (SSDATA (file)); @@ -3395,6 +3399,7 @@ syms_of_comp (void) DEFSYM (Qcomp_unit_load_failed, "comp-unit-load-failed"); /* Others. */ DEFSYM (Qfixnum, "fixnum"); + DEFSYM (Qadvice, "advice"); defsubr (&Scomp__init_ctxt); defsubr (&Scomp__release_ctxt); |