aboutsummaryrefslogtreecommitdiff
path: root/plugins/extraction/extract_env.ml
diff options
context:
space:
mode:
Diffstat (limited to 'plugins/extraction/extract_env.ml')
-rw-r--r--plugins/extraction/extract_env.ml3
1 files changed, 2 insertions, 1 deletions
diff --git a/plugins/extraction/extract_env.ml b/plugins/extraction/extract_env.ml
index 02383799a9..f7d78551d8 100644
--- a/plugins/extraction/extract_env.ml
+++ b/plugins/extraction/extract_env.ml
@@ -163,7 +163,8 @@ let expand_mexpr env mpo me =
let expand_modtype env mp me =
let inl = Some (Flags.get_inline_level()) in
- Mod_typing.translate_modtype env mp inl ([],me)
+ let mtb, _cst = Mod_typing.translate_modtype env mp inl ([],me) in
+ mtb
let no_delta = Mod_subst.empty_delta_resolver