diff options
| author | Pierre-Marie Pédrot | 2018-09-25 20:12:39 +0200 |
|---|---|---|
| committer | Pierre-Marie Pédrot | 2018-09-25 20:12:39 +0200 |
| commit | 7cc70b0df61718a946327d5bfb056b140eeb54ba (patch) | |
| tree | 577a2f193d2cca1e749f0fdca05248786c3039d0 /vernac | |
| parent | 7c5191282697c091d576b938adadc7a23ac8b9bd (diff) | |
| parent | 1ac3418389789e7288c5fb3576f787b7c2544342 (diff) | |
Merge PR #8535: Fixing #8532: regression in Print Assumptions within a functor.
Diffstat (limited to 'vernac')
| -rw-r--r-- | vernac/assumptions.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/vernac/assumptions.ml b/vernac/assumptions.ml index 0bcd3c64eb..b000745961 100644 --- a/vernac/assumptions.ml +++ b/vernac/assumptions.ml @@ -71,7 +71,7 @@ let rec fields_of_functor f subs mp0 args = function let rec lookup_module_in_impl mp = match mp with | MPfile _ -> Global.lookup_module mp - | MPbound _ -> assert false + | MPbound _ -> Global.lookup_module mp | MPdot (mp',lab') -> if ModPath.equal mp' (Global.current_modpath ()) then Global.lookup_module mp |