diff options
Diffstat (limited to 'plugins')
| -rw-r--r-- | plugins/ltac/rewrite.ml | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/plugins/ltac/rewrite.ml b/plugins/ltac/rewrite.ml index 740e955049..7d917c58fe 100644 --- a/plugins/ltac/rewrite.ml +++ b/plugins/ltac/rewrite.ml @@ -48,8 +48,6 @@ type rewrite_attributes = { polymorphic : bool; program : bool; global : bool } let rewrite_attributes = let open Attributes.Notations in Attributes.(polymorphic ++ program ++ locality) >>= fun ((polymorphic, program), locality) -> - let polymorphic = Option.default (Flags.is_universe_polymorphism()) polymorphic in - let program = Option.default (Flags.is_program_mode ()) program in let global = not (Locality.make_section_locality locality) in Attributes.Notations.return { polymorphic; program; global } |