exception SvnError of string;; val checkout : string -> unit val html_of_library : string -> string val reset_lib : unit -> unit