diff options
| author | Gaëtan Gilbert | 2019-10-13 20:20:56 +0200 |
|---|---|---|
| committer | Gaëtan Gilbert | 2019-10-13 20:20:56 +0200 |
| commit | ce1d51dc40cdb65b01b559ab076f76b265ccf6c4 (patch) | |
| tree | f3b0697a4ba47561024cef230d9b44895cc7d0de /vernac/comAssumption.ml | |
| parent | 7f039cac07526881da1a149b8c0e49be32c2e89e (diff) | |
Fix #10888: Context import behaviour in modtype
Diffstat (limited to 'vernac/comAssumption.ml')
| -rw-r--r-- | vernac/comAssumption.ml | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/vernac/comAssumption.ml b/vernac/comAssumption.ml index 8cf5e3a8b4..5ba8b0ab3c 100644 --- a/vernac/comAssumption.ml +++ b/vernac/comAssumption.ml @@ -247,8 +247,10 @@ let context_nosection sigma ~poly ctx = let entry = Declare.definition_entry ~univs ~types:t b in Declare.DefinitionEntry entry in - (* let local = Declare.ImportNeedQualified in *) - let cst = Declare.declare_constant ~name ~kind ~local:Declare.ImportNeedQualified decl in + let local = if Lib.is_modtype () then Declare.ImportDefaultBehavior + else Declare.ImportNeedQualified + in + let cst = Declare.declare_constant ~name ~kind ~local decl in let () = Declare.assumption_message name in let env = Global.env () in (* why local when is_modtype? *) |
