Fix for #3154: use CUnix.sys_command to call native compiler.

Patch by CJ on bugzilla. CUnix.sys_command doesn't rely on a shell, so extra
care with cmd.exe vs sh is no longer required.

1 files changed, 1 insertions, 1 deletions

diff --git a/pretyping/nativenorm.ml b/pretyping/nativenorm.ml
index 274357adb..9af68b46b 100644
--- a/pretyping/nativenorm.ml
+++ b/pretyping/nativenorm.ml
@@ -389,7 +389,7 @@ let native_norm env sigma c ty =
   let ml_filename, prefix = Nativelib.get_ml_filename () in
   let code, upd = mk_norm_code penv sigma prefix c in
   match Nativelib.compile ml_filename code with
-    | 0,fn ->
+    | true, fn ->
         if !Flags.debug then Pp.msg_debug (Pp.str "Running norm ...");
         let t0 = Sys.time () in
         Nativelib.call_linker ~fatal:true prefix fn (Some upd);