val parse_cmdline : unit -> unit val index_empty_texts : bool ref val sample_factor : int ref val disable_text_collection : bool ref val query : string ref val input_file : string ref val output_file : string option ref val save_file : string ref