ic := open_in fname
in
Arg.parse [] open_file usage;
- let deps = GrafiteParser.parse_dependencies (Stream.of_channel !ic) in
+ let deps =
+ GrafiteParser.parse_dependencies (Ulexing.from_utf8_channel !ic)
+ in
List.iter (fun dep -> print_endline (GrafiteAstPp.pp_dependency dep)) deps
+