("Do not catch top-level exception "
^ "(useful for backtrace inspection)");
"-onepass",
- Arg.Unit (fun () -> MultiPassDisambiguator.only_one_pass := true),
+ Arg.Unit (fun () -> () (* MultiPassDisambiguator.only_one_pass := true *)),
"Enable only one disambiguation pass";
]
else []
status :=
List.fold_left (fun s f -> f s) !status
(conf_components @ other_components);
- NCicLibrary.init ()
+ (* library for single user mode *)
+ NCicLibrary.init None
let parse_cmdline_and_configuration_file () =
status := List.fold_left (fun s f -> f s) !status conf_components