Fix for 4.04

This commit is contained in:
Jeremie Dimino 2017-03-02 17:01:56 +00:00
parent 51ce0c2daf
commit a1bcf263c3
1 changed files with 3 additions and 1 deletions

View File

@ -129,7 +129,9 @@ module Gen(P : Params) = struct
| _ -> None))
let dirs_with_dot_opam_files =
Path.Set.map dirs_with_dot_opam_files ~f:(Path.append context.build_dir)
Path.Set.elements dirs_with_dot_opam_files
|> List.map ~f:(Path.append context.build_dir)
|> Path.Set.of_list
end
let ctx = P.context