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