prerr_endline "";
prerr_endline "usage:";
prerr_endline "\tmatitaclean all";
- prerr_endline "\tmatitaclean (uri|file)+";
+ prerr_endline "\t\tcleans the whole environment";
+ prerr_endline "\tmatitaclean files...";
+ prerr_endline "\t\tcleans the output of the compilation of files...\n";
prerr_endline "";
exit 1
if Array.length Sys.argv < 2 then usage ();
if Sys.argv.(1) = "all" then
begin
- MatitaDb.reset_owner_environment ();
+ MatitaDb.clean_owner_environment ();
exit 0
end
let uri_to_remove =ref [] in