more fix stdlib warnings

ocaml · Apr 16, 2020 · 6bf1a59 · 6bf1a59
1 parent c5aab9b
commit 6bf1a59
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 0 deletions.
diff --git a/src/core/opamCompat.mli b/src/core/opamCompat.mli
@@ -89,3 +89,7 @@ module Filename
   val extension : string -> string
 end
 #endif
+
+#if OCAML_VERSION < (4, 7, 0)
+module Stdlib = Pervasives
+#endif
diff --git a/src/core/opamFilename.ml b/src/core/opamFilename.ml
@@ -374,6 +374,7 @@ let flock flag ?dontblock file = OpamSystem.flock flag ?dontblock (to_string fil
 let with_flock flag ?dontblock file f =
   let lock = OpamSystem.flock flag ?dontblock (to_string file) in
   try
+    let open OpamCompat in
     let (fd, ch) =
       match OpamSystem.get_lock_fd lock with
       | exception Not_found ->