Up
module
CommonArg
:
sig
#
type
'a on_off = {
#
enable
: 'a
;
#
disable
: 'a
;
}
#
type
t = {
#
debug
: string list
on_off
;
#
optim
: string list
on_off
;
}
#
val
t :
t
Cmdliner
.
Term
.
t
#
val
eval :
t
->
unit
end