diff options
| author | Pierre-Marie Pédrot | 2019-01-23 16:20:45 +0100 |
|---|---|---|
| committer | Pierre-Marie Pédrot | 2019-01-23 16:20:45 +0100 |
| commit | 0b5dd8afd26b33b358824b3ebb88e3d6bfc41492 (patch) | |
| tree | 18ba28a241c9f75bed5376ebcef7b506fd188f0c /plugins | |
| parent | 299e445c03c49f3260fca97e135d1fcfb4170751 (diff) | |
| parent | 2986683c5e6379d07574d0cb2ba2a609085aa8e3 (diff) | |
Merge PR #9270: Turn `Refine instance Mode` off by default
Ack-by: SkySkimmer
Ack-by: maximedenes
Reviewed-by: ppedrot
Diffstat (limited to 'plugins')
| -rw-r--r-- | plugins/ltac/rewrite.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/plugins/ltac/rewrite.ml b/plugins/ltac/rewrite.ml index 4bb52f599a..2055b25ff4 100644 --- a/plugins/ltac/rewrite.ml +++ b/plugins/ltac/rewrite.ml @@ -2014,7 +2014,7 @@ let add_morphism atts binders m s n = in let tac = Tacinterp.interp (make_tactic "add_morphism_tactic") in ignore(new_instance ~program_mode:atts.program ~global:atts.global atts.polymorphic binders instance - (Some (true, CAst.make @@ CRecord [])) + None ~generalize:false ~tac ~hook:(declare_projection n instance_id) Hints.empty_hint_info) (** Bind to "rewrite" too *) |