* http://helm.cs.unibo.it/
*)
+(* $Id$ *)
+
let _ =
let ic = ref stdin in
let usage = "test_coarse_parser [ file ]" in
in
Arg.parse [] open_file usage;
let deps =
- GrafiteParser.parse_dependencies (Ulexing.from_utf8_channel !ic)
+ DependenciesParser.parse_dependencies (Ulexing.from_utf8_channel !ic)
in
- List.iter (fun dep -> print_endline (GrafiteAstPp.pp_dependency dep)) deps
+ List.iter (fun dep -> print_endline (DependenciesParser.pp_dependency dep)) deps