matthieu
/
dune
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Uncomment check for executable names

This commit is contained in:
Jeremie Dimino 2017-02-28 10:37:10 +00:00
parent dc5c5851ff
commit 98c083db21
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
src/gen_rules.ml
View File

@ -1231,11 +1231,10 @@ module Gen(P : Params) = struct
String_map.map modules ~f:(fun (m : Module.t) ->
{ m with obj_name = obj_name_of_basename m.ml_fname })
in
(* List.iter exes.names ~f:(fun name ->
List.iter exes.names ~f:(fun name ->
if not (String_map.mem (String.capitalize name) modules) then
die "executable %s in %s doesn't have a corresponding .ml file"
name (Path.to_string dir));
*)
let modules =
pped_modules ~dir ~dep_kind ~modules
~preprocess:exes.buildable.preprocess