Don't rely on "ext_exe" always being present

It's not present in older OCaml, so we need to guess the ext_exe ourselves.
This commit is contained in:
Rudi Grinberg 2018-04-20 17:32:48 +07:00
parent 13eea737f9
commit 709385ed66
1 changed files with 9 additions and 1 deletions

View File

@ -46,7 +46,15 @@ and postprocess tbl b = parse
] in
(* need to special case exe since we can only remove this extension in
general *)
match var "ext_exe" with
match (
match Configurator.ocaml_config_var config "ext_exe" with
| Some s -> s
| None ->
begin match Configurator.ocaml_config_var_exn config "system" with
| "Win32" -> ".exe"
| _ -> ""
end
) with
| "" -> exts
| ext -> (ext, "") :: exts
in