fix compilation on < 4.08

This commit is contained in:
Simon Cruanes 2019-06-19 09:50:36 -05:00
parent 7ff5aa0d18
commit 21feaaf1ca
2 changed files with 0 additions and 6 deletions

View file

@ -1,4 +1,3 @@
(* This file is free software, part of containers. See file "license" for more details. *) (* This file is free software, part of containers. See file "license" for more details. *)
(** {1 Array utils} *) (** {1 Array utils} *)
@ -20,8 +19,6 @@ type 'a printer = Format.formatter -> 'a -> unit
include CCShimsArray_ include CCShimsArray_
type 'a t = 'a array
let empty = [| |] let empty = [| |]
let map = Array.map let map = Array.map

View file

@ -20,9 +20,6 @@ external make_float : int -> float array = "caml_make_float_vect" (* compat *)
include module type of CCShimsArray_ include module type of CCShimsArray_
type 'a t = 'a array
(** The type for arrays *)
val empty : 'a t val empty : 'a t
(** [empty] is the empty array, physically equal to [||]. *) (** [empty] is the empty array, physically equal to [||]. *)