simon/ocaml-containers
1
0
Fork 0
mirror of https://github.com/c-cube/ocaml-containers.git synced 2025-12-10 21:23:57 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

fix: compat in CCArray

Browse source
This commit is contained in:
Simon Cruanes 2022-02-21 22:26:51 -05:00
parent 68e539173f
commit f6dc3b23f8
No known key found for this signature in database
GPG key ID: 4AC01D0849AA62B6
1 changed files with 4 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
src/core/CCArray.ml
View file

@ -720,11 +720,15 @@ module Infix = struct
let (--) = (--) let (--) = (--)
let (--^) = (--^) let (--^) = (--^)
[@@@ifge 4.8]
type 'a t = 'a array type 'a t = 'a array
let ( let* ) = (>>=) let ( let* ) = (>>=)
let (let+) = (>|=) let (let+) = (>|=)
let[@inline] (and+) a1 a2 = monoid_product (fun x y->x,y) a1 a2 let[@inline] (and+) a1 a2 = monoid_product (fun x y->x,y) a1 a2
let ( and* ) = (and+) let ( and* ) = (and+)
[@@@endif]
end end
include Infix include Infix