diff options
Diffstat (limited to 'lib/flags.mli')
| -rw-r--r-- | lib/flags.mli | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lib/flags.mli b/lib/flags.mli index 9dbe2c68c1..14b9f26bcc 100644 --- a/lib/flags.mli +++ b/lib/flags.mli @@ -64,6 +64,9 @@ val if_warn : ('a -> unit) -> 'a -> unit use [with_option o (f x y) z]) *) val with_option : bool ref -> ('a -> 'b) -> 'a -> 'b +(** As [with_option], but on several flags. *) +val with_options : bool ref list -> ('a -> 'b) -> 'a -> 'b + (** Temporarily deactivate an option *) val without_option : bool ref -> ('a -> 'b) -> 'a -> 'b |