module OASISContext:sig
..end
typelevel =
[ `Debug | `Error | `Info | `Warning ]
type
t = {
|
quiet : |
(* |
Display nothing.
| *) |
|
info : |
(* |
Display info messages.
| *) |
|
debug : |
(* |
Display also debug messages.
| *) |
|
ignore_plugins : |
(* |
Don't use plugins
| *) |
|
ignore_unknown_fields : |
(* |
Ignore fields unknown
| *) |
|
printf : |
(* |
Redirect output
| *) |
val default : t Pervasives.ref
val fspecs : unit -> (string * Arg.spec * string) list * (unit -> t)
OASISContext.t
.val quiet : t