diff options
| author | Emilio Jesus Gallego Arias | 2019-06-26 01:12:16 +0200 |
|---|---|---|
| committer | Emilio Jesus Gallego Arias | 2019-06-26 01:12:16 +0200 |
| commit | 7e0697d6931d250fec2b1ff5092148d8ea11c4d3 (patch) | |
| tree | a5733301e8a031fbe7a53a0b40ffdcddaff38bab /plugins | |
| parent | b77084ebafe8ed2a8a4002b574078f592274a89c (diff) | |
| parent | 8948a2066c7172537a48f49987a79e6bfaab899c (diff) | |
Merge PR #10427: Move internal flag
Reviewed-by: ejgallego
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 9d928232c6..8acb29ba74 100644 --- a/plugins/ltac/rewrite.ml +++ b/plugins/ltac/rewrite.ml @@ -1978,7 +1978,7 @@ let add_morphism_as_parameter atts m n : unit = let evd = Evd.from_env env in let uctx, instance = build_morphism_signature env evd m in let uctx = UState.univ_entry ~poly:atts.polymorphic uctx in - let cst = Declare.declare_constant ~internal:Declare.InternalTacticRequest instance_id + let cst = Declare.declare_constant instance_id (Declare.ParameterEntry (None,(instance,uctx),None), Decl_kinds.IsAssumption Decl_kinds.Logical) |
