From 2d1ad67065d200450249ca8fb870059e8424f49e Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?J=C3=A9r=C3=B4me=2EVouillon?= Date: Mon, 17 Jun 2019 13:40:21 +0200 Subject: [PATCH] No longer invoke Dynlink.init This function was deprecated and has been removed in OCaml 4.08 --- src/baselib/dynlink_wrapper.natdynlink.ml | 2 -- src/server/ocsigen_server.ml | 1 - 2 files changed, 3 deletions(-) diff --git a/src/baselib/dynlink_wrapper.natdynlink.ml b/src/baselib/dynlink_wrapper.natdynlink.ml index 5dd0f3ea8..4cad2ad08 100644 --- a/src/baselib/dynlink_wrapper.natdynlink.ml +++ b/src/baselib/dynlink_wrapper.natdynlink.ml @@ -26,8 +26,6 @@ let loadfile = loadfile let error_message = error_message -let init = init - let allow_unsafe_modules = allow_unsafe_modules let prohibit = prohibit diff --git a/src/server/ocsigen_server.ml b/src/server/ocsigen_server.ml index 1aebce4cb..305bbc08e 100644 --- a/src/server/ocsigen_server.ml +++ b/src/server/ocsigen_server.ml @@ -1314,7 +1314,6 @@ let start_server () = (fun s -> Lwt_log.ign_error ~section s)); (* Now I can load the modules *) - Dynlink_wrapper.init (); Dynlink_wrapper.allow_unsafe_modules true; Ocsigen_extensions.start_initialisation ();