Permalink
Browse files

PR#5868: Somewhat a better fix for -native option.

git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@13195 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
  • Loading branch information...
1 parent c32a22b commit 34994c82ecd1394e3dc2dbe9e0ac40f056760c42 meyer committed Jan 1, 2013
Showing with 4 additions and 2 deletions.
  1. +4 −2 tools/ocamldep.ml
View
@@ -250,8 +250,10 @@ let ml_file_dependencies source_file =
let (byt_deps, native_deps) =
Depend.StringSet.fold (find_dependency ML)
extracted_deps init_deps in
- print_dependencies (byte_targets @ extra_targets) byt_deps;
- print_dependencies (native_targets @ extra_targets) native_deps;
+ (match byte_targets @ extra_targets with
+ | [] -> ()
+ | targets -> print_dependencies targets byt_deps);
+ print_dependencies (native_targets @ extra_targets) native_deps
end
let mli_file_dependencies source_file =

0 comments on commit 34994c8

Please sign in to comment.