• en

Module Eclipse

module Version : sig
module Pcre = Re_pcre
val it : Common.Util.Info.t
val info : ('a, unit, string, unit) Pervasives.format4 -> 'a
val nt : Common.Util.Notice.t
val notice : ('a, unit, string, unit) Pervasives.format4 -> 'a
val wt : Common.Util.Warning.t
val warning : ('a, unit, string, unit) Pervasives.format4 -> 'a
val dt : Common.Util.Debug.t
val debug : ('a, unit, string, unit) Pervasives.format4 -> 'a
val fatal : ('a, unit, string, 'b) Pervasives.format4 -> 'a
val rex : Re.re
val parse_version : string -> string
val compare : string -> string -> int
end
module Packages : sig
val it : Common.Util.Info.t
val info : ('a, unit, string, unit) Pervasives.format4 -> 'a
val nt : Common.Util.Notice.t
val notice : ('a, unit, string, unit) Pervasives.format4 -> 'a
val wt : Common.Util.Warning.t
val warning : ('a, unit, string, unit) Pervasives.format4 -> 'a
val dt : Common.Util.Debug.t
val debug : ('a, unit, string, unit) Pervasives.format4 -> 'a
val fatal : ('a, unit, string, 'b) Pervasives.format4 -> 'a
type package = {
name : Debian.Format822.name;
version : Debian.Format822.version;
depends : Debian.Format822.vpkgformula;
conflicts : Debian.Format822.vpkglist;
provides : Debian.Format822.vpkglist;
recommends : Debian.Format822.vpkgformula;
suggests : Debian.Format822.vpkglist;
extras : (string * string) list;
}
strip down version of the debian package format
val default_package : package
val parse_s : ?opt:'a -> ?err:string -> ?multi:bool -> ('b * 'c) -> 'a -> string -> (string * ('b * 'c)) list -> 'a
val parse_e : (string * (string * ('a * 'b)) list -> 'b option) list -> (string * ('a * 'b)) list -> (string * 'b) list
val parse_name : ('a * 'b) -> 'b
val parse_version : ('a * string) -> string
val parse_vpkg : (Debian.Format822.loc * string) -> Debian.Format822.vpkg
val parse_package_stanza : (string * (string * (Debian.Format822.loc * Debian.Format822.architecture)) list -> Debian.Format822.architecture option) list -> (string * (Debian.Format822.loc * Debian.Format822.architecture)) list -> package option
val parse_packages_in : ?extras:(string * (string * (Debian.Format822.loc * Debian.Format822.architecture)) list -> Debian.Format822.architecture option) list -> string -> IO.input -> package list
module Set : sig
val pkgcompare : package -> package -> int
type elt = package
type t
val empty : t
val is_empty : t -> bool
val mem : elt -> t -> bool
val add : elt -> t -> t
val singleton : elt -> t
val remove : elt -> t -> t
val union : t -> t -> t
val inter : t -> t -> t
val diff : t -> t -> t
val compare : t -> t -> int
val equal : t -> t -> bool
val subset : t -> t -> bool
val iter : elt -> unit -> t -> unit
val fold : elt -> 'a -> 'a -> t -> 'a -> 'a
val for_all : elt -> bool -> t -> bool
val exists : elt -> bool -> t -> bool
val filter : elt -> bool -> t -> t
val partition : elt -> bool -> t -> (t * t)
val cardinal : t -> int
val elements : t -> elt list
val min_elt : t -> elt
val max_elt : t -> elt
val choose : t -> elt
val split : elt -> t -> (t * bool * t)
val find : elt -> t -> elt
val of_list : elt list -> t
end
val input_raw : ?extras:(string * (string * (Debian.Format822.loc * Debian.Format822.architecture)) list -> Debian.Format822.architecture option) list -> string list -> Set.elt list
val input_raw_ch : ?extras:(string * (string * (Debian.Format822.loc * Debian.Format822.architecture)) list -> Debian.Format822.architecture option) list -> IO.input -> Set.elt list
end
module Eclipsecudf : sig
type tables = {
versions_table : (string, string list) ExtLib.Hashtbl.t;
reverse_table : ((string * int), string) ExtLib.Hashtbl.t;
}
val create : int -> tables
type lookup = {
from_cudf : Cudf.package -> (string * string);
to_cudf : (string * string) -> Cudf.package;
}
val clear : tables -> unit
val init_versions_table : (Debian.Format822.name, Debian.Format822.version list) ExtLib.Hashtbl.t -> Packages.package -> unit
val init_virtual_table : (Debian.Format822.vpkgname, unit) ExtLib.Hashtbl.t -> Packages.package -> unit
val init_unit_table : (Debian.Format822.name, unit) ExtLib.Hashtbl.t -> Packages.package -> unit
val init_versioned_table : (Debian.Format822.vpkgname, unit) ExtLib.Hashtbl.t -> Packages.package -> unit
val init_tables : ?compare:Debian.Format822.version -> Debian.Format822.version -> int -> Packages.package list -> tables
val get_cudf_version : tables -> (string * string) -> int
val get_real_version : tables -> (string * int) -> string
val loadl : tables -> ((string * 'a) * (string * string) option) list -> (string * (TODO: b * int) option) list
val loadlc : tables -> 'a -> ((string * 'b) * (string * string) option) list -> (string * (TODO: c * int) option) list
val loadlp : tables -> ((string * 'a) * (string * string) option) list -> (string * (TODO: b * int) option) list
val loadll : tables -> ((string * 'a) * (string * string) option) list list -> (string * (TODO: b * int) option) list list
type extramap = (string * (string * Cudf_types.typedecl1)) list
val preamble : Cudf.preamble
val add_extra : (string * (string * Cudf_types.typedecl1)) list -> tables -> Packages.package -> (string * Cudf_types.typed_value) list
val tocudf : tables -> ?extras:(string * (string * Cudf_types.typedecl1)) list -> ?inst:bool -> Packages.package -> Cudf.package
val lltocudf : tables -> ((string * 'a) * (string * string) option) list list -> (string * (TODO: b * int) option) list list
val ltocudf : tables -> ((string * 'a) * (string * string) option) list -> (string * (TODO: b * int) option) list
val load_list : Packages.package list -> Cudf.package list
val load_universe : Packages.package list -> Cudf.universe
end