aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorAndrea Corallo2020-05-31 22:26:08 +0100
committerAndrea Corallo2020-05-31 22:47:32 +0100
commit2e25eebfbd25b131b6d0fcff4e60f7a8773d912b (patch)
treeff593bfb891530fba0e52e2f95aba5a78388d14b /src
parentce3c1ea83e18e6b8a02013bbdae4b4c183e39997 (diff)
downloademacs-2e25eebfbd25b131b6d0fcff4e60f7a8773d912b.tar.gz
emacs-2e25eebfbd25b131b6d0fcff4e60f7a8773d912b.zip
Store libgccjit version into generated code
* src/comp.c (emit_ctxt_code): Add libgccjit version into stored optimize qualities. (syms_of_comp): Define Qgccjit here. * src/w32fns.c (syms_of_w32fns): Move out Qgccjit definition.
Diffstat (limited to 'src')
-rw-r--r--src/comp.c7
-rw-r--r--src/w32fns.c1
2 files changed, 5 insertions, 3 deletions
diff --git a/src/comp.c b/src/comp.c
index 2d904c91548..d8e78bc2175 100644
--- a/src/comp.c
+++ b/src/comp.c
@@ -2634,8 +2634,10 @@ emit_ctxt_code (void)
2634 { Fcons (Qcomp_speed, 2634 { Fcons (Qcomp_speed,
2635 Fsymbol_value (Qcomp_speed)), 2635 Fsymbol_value (Qcomp_speed)),
2636 Fcons (Qcomp_debug, 2636 Fcons (Qcomp_debug,
2637 Fsymbol_value (Qcomp_debug)) }; 2637 Fsymbol_value (Qcomp_debug)),
2638 emit_static_object (TEXT_OPTIM_QLY_SYM, Flist (2, opt_qly)); 2638 Fcons (Qgccjit,
2639 Fcomp_libgccjit_version ()) };
2640 emit_static_object (TEXT_OPTIM_QLY_SYM, Flist (ARRAYELTS (opt_qly), opt_qly));
2639 2641
2640 emit_static_object (TEXT_FDOC_SYM, 2642 emit_static_object (TEXT_FDOC_SYM,
2641 CALL1I (comp-ctxt-function-docs, Vcomp_ctxt)); 2643 CALL1I (comp-ctxt-function-docs, Vcomp_ctxt));
@@ -4770,6 +4772,7 @@ syms_of_comp (void)
4770 DEFSYM (Qscratch, "scratch"); 4772 DEFSYM (Qscratch, "scratch");
4771 DEFSYM (Qlate, "late"); 4773 DEFSYM (Qlate, "late");
4772 DEFSYM (Qlambda_fixup, "lambda-fixup"); 4774 DEFSYM (Qlambda_fixup, "lambda-fixup");
4775 DEFSYM (Qgccjit, "gccjit");
4773 4776
4774 /* To be signaled by the compiler. */ 4777 /* To be signaled by the compiler. */
4775 DEFSYM (Qnative_compiler_error, "native-compiler-error"); 4778 DEFSYM (Qnative_compiler_error, "native-compiler-error");
diff --git a/src/w32fns.c b/src/w32fns.c
index eeb73489dd5..e595b0285a7 100644
--- a/src/w32fns.c
+++ b/src/w32fns.c
@@ -10462,7 +10462,6 @@ syms_of_w32fns (void)
10462 DEFSYM (Qzlib, "zlib"); 10462 DEFSYM (Qzlib, "zlib");
10463 DEFSYM (Qlcms2, "lcms2"); 10463 DEFSYM (Qlcms2, "lcms2");
10464 DEFSYM (Qjson, "json"); 10464 DEFSYM (Qjson, "json");
10465 DEFSYM (Qgccjit, "gccjit");
10466 10465
10467 Fput (Qundefined_color, Qerror_conditions, 10466 Fput (Qundefined_color, Qerror_conditions,
10468 pure_list (Qundefined_color, Qerror)); 10467 pure_list (Qundefined_color, Qerror));