diff options
| author | Maxime Dénès | 2019-07-08 15:00:36 +0200 |
|---|---|---|
| committer | Maxime Dénès | 2019-09-16 09:56:58 +0200 |
| commit | 4614010ceddb9ed5100fa4e43d2807b172143a19 (patch) | |
| tree | 79fbcf2cb11e04765b5736399c85cb06ac5298c4 /printing/printmod.ml | |
| parent | 2957e86c93556b0baf86b662d34fce1a2096edc2 (diff) | |
Specialize `ImportObject` to `Export`
`Import` does not actually need to register an object, only `Export`
does. So we specialize and rename the object into `ExportObject`.
Diffstat (limited to 'printing/printmod.ml')
| -rw-r--r-- | printing/printmod.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/printing/printmod.ml b/printing/printmod.ml index 43992ec9d3..141469ff9c 100644 --- a/printing/printmod.ml +++ b/printing/printmod.ml @@ -242,7 +242,7 @@ let nametab_register_body mp dir (l,body) = let nametab_register_module_body mp struc = (* If [mp] is a globally visible module, we simply import it *) - try Declaremods.really_import_module mp + try Declaremods.import_module ~export:false mp with Not_found -> (* Otherwise we try to emulate an import by playing with nametab *) nametab_register_dir mp; |