Ouvrir le source en mode binaire pour avoir des numeros de caracteres corrects (PR#175)

git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@3266 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
2000-08-04 10:09:23 +00:00 · 2000-08-04 10:09:23 +00:00 · 668286f4e9
parent bda548635f
commit 668286f4e9
1 changed files with 1 additions and 1 deletions
--- a/tools/ocamldep.ml
+++ b/tools/ocamldep.ml
@ -313,7 +313,7 @@ let file_dependencies source_file =
  if Sys.file_exists source_file then begin
    try
      free_structure_names := StringSet.empty;
-      let ic = open_in source_file in
+      let ic = open_in_bin source_file in
      try
        let lb = Lexing.from_channel ic in
        if Filename.check_suffix source_file ".ml" then begin