Module Oug


module Oug: sig .. end

val includes : string list Pervasives.ref
val nolabels : bool Pervasives.ref
val pp : string option Pervasives.ref
val rectypes : bool Pervasives.ref
val reduce_exps : bool Pervasives.ref
val progress : bool Pervasives.ref

type mode =
| Compile
| Gather
val mode : mode Pervasives.ref
val output_file : string Pervasives.ref

type post_action =
| Dot_module_depend of string
| Filter of Oug_lang.filter
| Useless of string
| Display_id of int
| Remove of string
| Reload of string
| Add of string
val actions : post_action list Pervasives.ref
val options : (string * Arg.spec * string) list
val parse : unit -> string list
val useless : [ `Raw ] Oug_data.t -> string -> unit
val intf_of_file_kind_to_remove : Oug_files.file_kind -> bool
val do_action : Oug_analyze.ocaml_options ->
[ `Raw ] Oug_data.t -> post_action -> [ `Raw ] Oug_data.t
val do_actions : Oug_analyze.ocaml_options ->
[ `Raw ] Oug_data.t -> post_action list -> [ `Raw ] Oug_data.t
val main : unit -> unit