aboutsummaryrefslogtreecommitdiff
path: root/lib/flags.ml
diff options
context:
space:
mode:
authorMaxime Dénès2016-06-28 10:57:52 +0200
committerMaxime Dénès2016-06-28 10:57:52 +0200
commit16a6be0332bf3bea4a87ee5eec874cbf444174c3 (patch)
tree39c64e0325f525e7f785d1322db339cbfe70d4ed /lib/flags.ml
parent35b28e591cc3cf00afcc56aec2f206b58bfd416e (diff)
parent4b3a261bee1882c338e6e72e992349dfa02f9678 (diff)
Merge branch 'warnings' into trunk
Was PR#213: New warnings machinery
Diffstat (limited to 'lib/flags.ml')
-rw-r--r--lib/flags.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/flags.ml b/lib/flags.ml
index ba19c7a63b..13525165ab 100644
--- a/lib/flags.ml
+++ b/lib/flags.ml
@@ -172,7 +172,7 @@ let make_polymorphic_flag b =
let program_mode = ref false
let is_program_mode () = !program_mode
-let warn = ref false
+let warn = ref true
let make_warn flag = warn := flag; ()
let if_warn f x = if !warn then f x