diff options
| author | Maxime Dénès | 2017-09-22 11:17:59 +0200 |
|---|---|---|
| committer | Maxime Dénès | 2017-09-22 11:17:59 +0200 |
| commit | 809fab2fde0c8dbd8ea940c563be9ab5f988d9d0 (patch) | |
| tree | 794b00b40999ca24a6dcfa4de8753403c45fedea /vernac/command.ml | |
| parent | b79f9c1b0e2b49499afa93f6fe33321890205eb2 (diff) | |
| parent | fb482f6b02156c1fcf029263083b0371e030a2cd (diff) | |
Merge PR #1063: [flags] Flag `open Flags`
Diffstat (limited to 'vernac/command.ml')
| -rw-r--r-- | vernac/command.ml | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/vernac/command.ml b/vernac/command.ml index 32ab5401a0..b611edc41d 100644 --- a/vernac/command.ml +++ b/vernac/command.ml @@ -9,7 +9,6 @@ open Pp open CErrors open Util -open Flags open Term open Vars open Termops @@ -692,7 +691,7 @@ let declare_mutual_inductive_with_eliminations mie pl impls = constrimpls) impls; let warn_prim = match mie.mind_entry_record with Some (Some _) -> not prim | _ -> false in - if_verbose Feedback.msg_info (minductive_message warn_prim names); + Flags.if_verbose Feedback.msg_info (minductive_message warn_prim names); if mie.mind_entry_private == None then declare_default_schemes mind; mind |