From 7ec7166ae4487886bd432de6232495c33f3ae977 Mon Sep 17 00:00:00 2001 From: Jeremie Dimino Date: Tue, 10 Jul 2018 16:42:22 +0100 Subject: [PATCH] Restore PA_CPP in jbuild files Signed-off-by: Jeremie Dimino --- src/pform.ml | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/src/pform.ml b/src/pform.ml index 9efc9fbc..238192d7 100644 --- a/src/pform.ml +++ b/src/pform.ml @@ -106,6 +106,9 @@ module Map = struct let strings s = values (Value.L.strings s) in let lowercased = [ "cpp" , strings (context.c_compiler :: cflags @ ["-E"]) + ; "pa_cpp" , strings (context.c_compiler :: cflags + @ ["-undef"; "-traditional"; + "-x"; "c"; "-E"]) ; "cc" , strings (context.c_compiler :: cflags) ; "cxx" , strings (context.c_compiler :: cxx_flags) ; "ocaml" , path context.ocaml @@ -121,9 +124,6 @@ module Map = struct in let other = [ "-verbose" , values [] - ; "pa_cpp" , strings (context.c_compiler :: cflags - @ ["-undef"; "-traditional"; - "-x"; "c"; "-E"]) ; "ocaml_bin" , values [Dir context.ocaml_bin] ; "ocaml_version" , string context.version_string ; "ocaml_where" , string (Path.to_string context.stdlib_dir)