Up

module Url

: sig

#

type debtypes = [

| `Edsp

| `Deb

]

#

type rpmtypes = [

| `Synthesis

| `Hdlist

]

#

type osgitypes = [

| `Eclipse

]

#

type othertypes = [

| `Csw

]

#

type filetypes = [

| `Cudf

]

#

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

end