From 7befcc7ea63ea4bd6e45e6f4b8ec01a69b586cc7 Mon Sep 17 00:00:00 2001 From: Enrico Tassi Date: Sun, 24 Aug 2014 11:17:00 +0200 Subject: Fix Declaremods.end_library (Closes: #3536) --- library/declaremods.ml | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'library/declaremods.ml') diff --git a/library/declaremods.ml b/library/declaremods.ml index e4f227637..bf6fe9f0d 100644 --- a/library/declaremods.ml +++ b/library/declaremods.ml @@ -874,8 +874,9 @@ let start_library dir = Lib.add_frozen_state () let end_library dir = + let oname = Lib.end_compilation_checks dir in let mp,cenv,ast = Global.export dir in - let prefix, lib_stack = Lib.end_compilation dir in + let prefix, lib_stack = Lib.end_compilation oname in assert (ModPath.equal mp (MPfile dir)); let substitute, keep, _ = Lib.classify_segment lib_stack in cenv,(substitute,keep),ast -- cgit v1.2.3