Permalink
Browse files

trim some debug

  • Loading branch information...
1 parent 677c4fb commit 6dc51bf0530bdcc3555aeb64a877609cc88ce5ca @avsm committed Sep 9, 2012
Showing with 1 addition and 1 deletion.
  1. +1 −1 src/run.ml
View
2 src/run.ml
@@ -406,7 +406,7 @@ let system_ocamlc_where () =
with Not_found -> "" in
let path = Utils.reset_env_value ~prefix:!Globals.root_path path in
match read_command_output ~path [ "ocamlc"; "-where" ] with
- | h::_ -> Printf.eprintf "XXXX %s\n" h; Some (Utils.string_strip h)
+ | h::_ -> Some (Utils.string_strip h)
| [] -> internal_error "ocamlc -where"
with _ ->
None

0 comments on commit 6dc51bf

Please sign in to comment.