From f6dc3b23f8f0e2b024b63d7bbbf0b81f71e3eef4 Mon Sep 17 00:00:00 2001 From: Simon Cruanes Date: Mon, 21 Feb 2022 22:26:51 -0500 Subject: [PATCH] fix: compat in CCArray --- src/core/CCArray.ml | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/src/core/CCArray.ml b/src/core/CCArray.ml index c02ccfdb..87a439d7 100644 --- a/src/core/CCArray.ml +++ b/src/core/CCArray.ml @@ -720,11 +720,15 @@ module Infix = struct let (--) = (--) let (--^) = (--^) + [@@@ifge 4.8] + type 'a t = 'a array let ( let* ) = (>>=) let (let+) = (>|=) let[@inline] (and+) a1 a2 = monoid_product (fun x y->x,y) a1 a2 let ( and* ) = (and+) + + [@@@endif] end include Infix