|
|
@ -22,7 +22,18 @@ type action_item =
|
|
|
|
let normalize (args: array string) :list action_item => {
|
|
|
|
let normalize (args: array string) :list action_item => {
|
|
|
|
let cmd = ClangCommand.mk ClangQuotes.SingleQuotes args;
|
|
|
|
let cmd = ClangCommand.mk ClangQuotes.SingleQuotes args;
|
|
|
|
let clang_hashhashhash =
|
|
|
|
let clang_hashhashhash =
|
|
|
|
Printf.sprintf "%s 2>&1" (ClangCommand.prepend_arg "-###" cmd |> ClangCommand.command_to_run);
|
|
|
|
Printf.sprintf
|
|
|
|
|
|
|
|
"%s 2>&1"
|
|
|
|
|
|
|
|
(
|
|
|
|
|
|
|
|
ClangCommand.prepend_arg "-###" cmd |>
|
|
|
|
|
|
|
|
/* c++ modules are not supported, so let clang know in case it was passed
|
|
|
|
|
|
|
|
"-fmodules". Unfortunately we cannot know accurately if "-fmodules" was passed because we
|
|
|
|
|
|
|
|
don't go into argument files at this point ("clang -### ..." will do that for us), so we
|
|
|
|
|
|
|
|
also pass "-Qunused-arguments" to silence the potential warning that "-fno-cxx-modules"
|
|
|
|
|
|
|
|
was ignored. Moreover, "-fno-cxx-modules" is only accepted by the clang driver so we have
|
|
|
|
|
|
|
|
to pass it now. */
|
|
|
|
|
|
|
|
ClangCommand.append_args ["-fno-cxx-modules", "-Qunused-arguments"] |> ClangCommand.command_to_run
|
|
|
|
|
|
|
|
);
|
|
|
|
Logging.out "clang -### invocation: %s@\n" clang_hashhashhash;
|
|
|
|
Logging.out "clang -### invocation: %s@\n" clang_hashhashhash;
|
|
|
|
let normalized_commands = ref [];
|
|
|
|
let normalized_commands = ref [];
|
|
|
|
let one_line line =>
|
|
|
|
let one_line line =>
|
|
|
|