Merge pull request #8 from kit-ty-kate/500

Add support for OCaml 5.00
mirage · Feb 24, 2022 · 75e9fbf · 75e9fbf
2 parents 47c6060 + bae50a9
commit 75e9fbf
Show file tree

Hide file tree

Showing 6 changed files with 8 additions and 6 deletions.
diff --git a/.ocamlformat b/.ocamlformat
@@ -1,3 +1,4 @@
+version=0.20.1
 break-sequences=true
 doc-comments=before
 field-space=loose

diff --git a/mmap.opam b/mmap.opam
@@ -12,6 +12,7 @@ build: [
 depends: [
   "ocaml" {>= "4.02.3"}
   "dune" {>= "1.6"}
+  "bigarray-compat"
 ]
 synopsis: "File mapping functionality"
 description: """

diff --git a/src/dune b/src/dune
@@ -1,7 +1,7 @@
 (library
  (public_name mmap)
  (modules mmap)
- (libraries unix bigarray))
+ (libraries unix bigarray-compat))
 
 (rule
  (with-stdout-to selected (run %{ocaml} %{dep:which_mmap.ml} %{ocaml_version})))

diff --git a/src/mmap.mli b/src/mmap.mli
@@ -4,10 +4,10 @@ module V1 : sig
   val map_file :
        Unix.file_descr
     -> ?pos:int64
-    -> ('a, 'b) Bigarray.kind
-    -> 'c Bigarray.layout
+    -> ('a, 'b) Bigarray_compat.kind
+    -> 'c Bigarray_compat.layout
     -> bool
     -> int array
-    -> ('a, 'b, 'c) Bigarray.Genarray.t
+    -> ('a, 'b, 'c) Bigarray_compat.Genarray.t
   (** [map_file] is the same as {!Unix.map_file} in OCaml >= 4.06.0 *)
 end
diff --git a/src/mmap_bigarray.ml b/src/mmap_bigarray.ml
@@ -72,7 +72,7 @@ module V1 = struct
   ]
 
   let map_file fd ?pos kind layout shared dims =
-    try Bigarray.Genarray.map_file fd ?pos kind layout shared dims
+    try Bigarray_compat.Genarray.map_file fd ?pos kind layout shared dims
     with Sys_error description as exn ->
       try
         let error_code =

diff --git a/test/test.ml b/test/test.ml
@@ -1,4 +1,4 @@
-open Bigarray
+open Bigarray_compat
 
 (* Test harness *)