aboutsummaryrefslogtreecommitdiffstats
path: root/src/comp.c
diff options
context:
space:
mode:
authorAndrea Corallo2021-03-07 20:19:20 +0100
committerAndrea Corallo2021-03-07 20:19:20 +0100
commitdbdc44db15ef9daa24d92c59d4e158f3963a172f (patch)
treecf48697f66299efc55f9eddf369b9597b31e38b6 /src/comp.c
parent38b4ac3e6b5ac7e88003e02b30bbe2bdb82e6e6a (diff)
downloademacs-dbdc44db15ef9daa24d92c59d4e158f3963a172f.tar.gz
emacs-dbdc44db15ef9daa24d92c59d4e158f3963a172f.zip
Allow for `comp-native-driver-options' to work as a file-local variable.
Diffstat (limited to 'src/comp.c')
-rw-r--r--src/comp.c4
1 files changed, 3 insertions, 1 deletions
diff --git a/src/comp.c b/src/comp.c
index bea9945bbfe..b2d8b8ec987 100644
--- a/src/comp.c
+++ b/src/comp.c
@@ -516,6 +516,7 @@ typedef struct {
516typedef struct { 516typedef struct {
517 EMACS_INT speed; 517 EMACS_INT speed;
518 EMACS_INT debug; 518 EMACS_INT debug;
519 Lisp_Object driver_options;
519 gcc_jit_context *ctxt; 520 gcc_jit_context *ctxt;
520 gcc_jit_type *void_type; 521 gcc_jit_type *void_type;
521 gcc_jit_type *bool_type; 522 gcc_jit_type *bool_type;
@@ -4333,7 +4334,7 @@ DEFUN ("comp-native-driver-options-effective-p",
4333static void 4334static void
4334add_driver_options (void) 4335add_driver_options (void)
4335{ 4336{
4336 Lisp_Object options = Fsymbol_value (Qcomp_native_driver_options); 4337 Lisp_Object options = comp.driver_options;
4337 4338
4338#if defined (LIBGCCJIT_HAVE_gcc_jit_context_add_driver_option) \ 4339#if defined (LIBGCCJIT_HAVE_gcc_jit_context_add_driver_option) \
4339 || defined (WINDOWSNT) 4340 || defined (WINDOWSNT)
@@ -4400,6 +4401,7 @@ DEFUN ("comp--compile-ctxt-to-file", Fcomp__compile_ctxt_to_file,
4400 eassert (comp.speed < INT_MAX); 4401 eassert (comp.speed < INT_MAX);
4401 comp.debug = XFIXNUM (CALL1I (comp-ctxt-debug, Vcomp_ctxt)); 4402 comp.debug = XFIXNUM (CALL1I (comp-ctxt-debug, Vcomp_ctxt));
4402 eassert (comp.debug < INT_MAX); 4403 eassert (comp.debug < INT_MAX);
4404 comp.driver_options = CALL1I (comp-ctxt-driver-options, Vcomp_ctxt);
4403 4405
4404 if (comp.debug) 4406 if (comp.debug)
4405 gcc_jit_context_set_bool_option (comp.ctxt, 4407 gcc_jit_context_set_bool_option (comp.ctxt,