From b4c164a8e4cb05a600b39d189328f9ee05b6b4b4 Mon Sep 17 00:00:00 2001 From: Fardale Date: Wed, 12 Apr 2023 13:56:53 +0200 Subject: [PATCH] fix: __FUNCTION__ was only introduced in 4.12 --- src/core/CCArray.ml | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/src/core/CCArray.ml b/src/core/CCArray.ml index d8e2301f..93f3e955 100644 --- a/src/core/CCArray.ml +++ b/src/core/CCArray.ml @@ -163,7 +163,7 @@ let max cmp a = let max_exn cmp a = match max cmp a with - | None -> invalid_arg __FUNCTION__ + | None -> invalid_arg "CCArray.max_exn" | Some elt -> elt @@ -177,7 +177,7 @@ let argmax cmp a = let argmax_exn cmp a = match argmax cmp a with - | None -> invalid_arg __FUNCTION__ + | None -> invalid_arg "CCArray.argmax_exn" | Some elt -> elt let min cmp a = @@ -190,7 +190,7 @@ let min cmp a = let min_exn cmp a = match min cmp a with - | None -> invalid_arg __FUNCTION__ + | None -> invalid_arg "CCArray.min_exn" | Some elt -> elt @@ -204,7 +204,7 @@ let argmin cmp a = let argmin_exn cmp a = match argmin cmp a with - | None -> invalid_arg __FUNCTION__ + | None -> invalid_arg "CCArray.argmin_exn" | Some elt -> elt let filter_map f a =