[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
scratch/native-comp-gcc-driver-options d87fc65 3/3: Fix windows NT handl
From: |
Andrea Corallo |
Subject: |
scratch/native-comp-gcc-driver-options d87fc65 3/3: Fix windows NT handling for [...]_add_driver_options |
Date: |
Wed, 19 Aug 2020 11:28:51 -0400 (EDT) |
branch: scratch/native-comp-gcc-driver-options
commit d87fc65d865b61371c1c36ceda35a70b8141f554
Author: Andreas Fuchs <asf@boinkor.net>
Commit: Andrea Corallo <akrl@sdf.org>
Fix windows NT handling for [...]_add_driver_options
* Instead of conditionalizing on the wrong preprocessor flag, now use
the right one: LIBGCCJIT_HAVE_gcc_jit_context_add_driver_option
* Also perform the driver-option-adding step on win NT, but only if
the function is non-NULL.
* Make the function declaration for add_driver_options non-old-style.
---
src/comp.c | 27 +++++++++++++++++++--------
1 file changed, 19 insertions(+), 8 deletions(-)
diff --git a/src/comp.c b/src/comp.c
index 97a5665..03409cb 100644
--- a/src/comp.c
+++ b/src/comp.c
@@ -4123,23 +4123,34 @@ DEFUN ("comp--release-ctxt", Fcomp__release_ctxt,
Scomp__release_ctxt,
}
static void
-add_driver_options ()
+add_driver_options (void)
{
Lisp_Object options = Fsymbol_value (Qcomp_native_driver_options);
-#ifdef LIBGCCJIT_HAVE_gcc_jit_context_add_command_line_option
- while (CONSP (options))
+#if defined (LIBGCCJIT_HAVE_gcc_jit_context_add_driver_option) \
+ || defined (WINDOWSNT)
+#pragma GCC diagnostic ignored "-Waddress"
+ if (gcc_jit_context_add_driver_option)
{
- gcc_jit_context_add_driver_option (comp.ctxt, SSDATA (XCAR (options)));
- options = XCDR (options);
+ while (CONSP (options))
+ {
+ gcc_jit_context_add_driver_option (comp.ctxt,
+ SSDATA (XCAR (options)));
+ options = XCDR (options);
+ }
+
+ return;
}
-#else
+#pragma GCC diagnostic pop
+#endif
if (CONSP (options))
{
xsignal1 (Qnative_compiler_error,
- build_string ("Customizing native compiler options via
`comp-native-driver-options' is only available on libgccjit version 9 and
above."));
+ build_string ("Customizing native compiler options"
+ " via `comp-native-driver-options' is"
+ " only available on libgccjit version 9"
+ " and above."));
}
-#endif
}
static void