aboutsummaryrefslogtreecommitdiffhomepage
path: root/library/library.ml
diff options
context:
space:
mode:
authorGravatar Maxime Dénès <mail@maximedenes.fr>2016-03-04 19:01:35 +0100
committerGravatar Maxime Dénès <mail@maximedenes.fr>2016-03-04 19:01:35 +0100
commit35cc038e96395b0f4eaaeed3a5a48e6da2293f7e (patch)
tree6aadf76ea4a1e21506a075a0298ebe027efb83cd /library/library.ml
parent120053a50f87bd53398eedc887fa5e979f56f112 (diff)
Fix #4607: do not read native code files if native compiler was disabled.
Diffstat (limited to 'library/library.ml')
-rw-r--r--library/library.ml5
1 files changed, 2 insertions, 3 deletions
diff --git a/library/library.ml b/library/library.ml
index 79e5792c0..ccda57c2c 100644
--- a/library/library.ml
+++ b/library/library.ml
@@ -171,9 +171,8 @@ let register_loaded_library m =
let prefix = Nativecode.mod_uid_of_dirpath libname ^ "." in
let f = prefix ^ "cmo" in
let f = Dynlink.adapt_filename f in
- (* This will not produce errors or warnings if the native compiler was
- not enabled *)
- Nativelib.link_library ~prefix ~dirname ~basename:f
+ if not Coq_config.no_native_compiler then
+ Nativelib.link_library ~prefix ~dirname ~basename:f
in
let rec aux = function
| [] -> link m; [libname]