Up

module OASISContext

: sig

Global context for messages and i18n

Author Sylvain Le Gall
#
type level = [
| `Debug
| `Info
| `Warning
| `Error
]
#
type t = {
# quiet
: bool;(*Display nothing.*)
# info
: bool;(*Display info messages.*)
# debug
: bool;(*Display also debug messages.*)
# ignore_plugins
: bool;(*Don't use plugins*)
# ignore_unknown_fields
: bool;(*Ignore fields unknown*)
# printf
: level -> string -> unit;(*Redirect output*)
}
#
val default : t Pervasives.ref

Default context

#
val fspecs : unit -> (string * Arg.spec * string) list * (unit -> t)

Command line arguments to create t.

#
val quiet : t

Quiet context.

end