aboutsummaryrefslogtreecommitdiff
path: root/printing
diff options
context:
space:
mode:
authorMaxime Dénès2019-07-08 15:00:36 +0200
committerMaxime Dénès2019-09-16 09:56:58 +0200
commit4614010ceddb9ed5100fa4e43d2807b172143a19 (patch)
tree79fbcf2cb11e04765b5736399c85cb06ac5298c4 /printing
parent2957e86c93556b0baf86b662d34fce1a2096edc2 (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')
-rw-r--r--printing/printmod.ml2
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;