Opamcudf (dose3-extra.Dose

include sig ... end

val it : Dose_common__Util.Info.t

val info : ('a, unit, string, unit) Stdlib.format4 -> 'a

val nt : Dose_common__Util.Notice.t

val notice : ('a, unit, string, unit) Stdlib.format4 -> 'a

val wt : Dose_common__Util.Warning.t

val warning : ('a, unit, string, unit) Stdlib.format4 -> 'a

val dt : Dose_common__Util.Debug.t

val debug : ('a, unit, string, unit) Stdlib.format4 -> 'a

val fatal : ('a, unit, string, 'b) Stdlib.format4 -> 'a

type options = {

switch : string;
switches : string list;
profiles : string list;
depopts : bool;

}

val default_options : options

val preamble : Cudf.preamble

val add_extra : 
  (string * (string * Cudf_types.typedecl1)) list ->
  Dose_pef.Pefcudf.tables ->
  (string * string) ->
  < depopts : ((string * string option) * (string * string) option) list list
    ; extras : (string * string) list
    ; name : string
    ; version : string.. > ->
  (string * Cudf_types.typed_value) list

val decode : string -> string

val tocudf : 
  Dose_pef.Pefcudf.tables ->
  ?options:options ->
  ?extras:(string * (string * Cudf_types.typedecl1)) list ->
  < baselist : string list
    ; conflicts : ((string * string option) * (string * string) option) list
    ; depends : ((string * string option) * (string * string) option) list list
    ; depopts : ((string * string option) * (string * string) option) list list
    ; extras : (string * string) list
    ; installedlist : string list
    ; name : string
    ; pinnedlist : string list
    ; provides : ((string * string option) * (string * string) option) list
    ; switch : string list
    ; version : string.. > ->
  Cudf.package list

val encode_vpkglist : 
  Dose_pef.Pefcudf.tables ->
  string ->
  ((string * string option) * (string * string) option) list ->
  (string * ([> `Eq | `Geq | `Gt | `Leq | `Lt | `Neq ] * int) option) list

val requesttocudf : 
  Dose_pef.Pefcudf.tables ->
  Cudf.universe ->
  Packages.request ->
  Cudf.request

convert a opam request to a cudf request

val load_list : 
  ?options:options ->
  (string -> string -> int) ->
  < baselist : string list
    ; conflicts : ((string * string option) * (string * string) option) list
    ; depends : ((string * string option) * (string * string) option) list list
    ; depopts : ((string * string option) * (string * string) option) list list
    ; extras : (string * string) list
    ; installedlist : string list
    ; name : string
    ; pinnedlist : string list
    ; provides : ((string * string option) * (string * string) option) list
    ; recommends : 
      ((string * string option) * (string * string) option) list list
    ; switch : string list
    ; version : string.. >
    list ->
  Cudf.package list

val load_universe : 
  ?options:options ->
  (string -> string -> int) ->
  < baselist : string list
    ; conflicts : ((string * string option) * (string * string) option) list
    ; depends : ((string * string option) * (string * string) option) list list
    ; depopts : ((string * string option) * (string * string) option) list list
    ; extras : (string * string) list
    ; installedlist : string list
    ; name : string
    ; pinnedlist : string list
    ; provides : ((string * string option) * (string * string) option) list
    ; recommends : 
      ((string * string option) * (string * string) option) list list
    ; switch : string list
    ; version : string.. >
    list ->
  Cudf.universe