Module Common.Url

module Url: sig .. end

type debtypes = [ `Deb | `DebSrc | `Edsp ] 
type rpmtypes = [ `Hdlist | `Synthesis ] 
type othertypes = [ `Csw | `Npm | `Opam | `Pef ] 
type filetypes = [ `Csw
| `Cudf
| `Deb
| `DebSrc
| `Edsp
| `Hdlist
| `Npm
| `Opam
| `Pef
| `Synthesis ]
val supported_input_types : filetypes list
type url = {
   scheme : filetypes;
   path : string; (*

db name or filename

*)
}
val of_string : string -> url
exception Invalid_url of string
val to_string : url -> string
val scheme_to_string : filetypes -> string
val scheme_of_string : string -> filetypes