diff options
Diffstat (limited to 'lib/options.ml')
-rw-r--r-- | lib/options.ml | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lib/options.ml b/lib/options.ml index f1e40a89e..b60210fde 100644 --- a/lib/options.ml +++ b/lib/options.ml @@ -45,8 +45,7 @@ let if_verbose f x = if not !silent then f x (* The number of printed hypothesis in a goal *) let print_hyps_limit = ref (None : int option) -let set_print_hyps_limit n = print_hyps_limit := Some n -let unset_print_hyps_limit () = print_hyps_limit := None +let set_print_hyps_limit n = print_hyps_limit := n let print_hyps_limit () = !print_hyps_limit (* A list of the areas of the system where "unsafe" operation |