From f8851b8f78e395671ebe5e9de7a234ae77e596e3 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Fr=C3=A9d=C3=A9ric=20Loyer?= <116354005+F-Loyer@users.noreply.github.com> Date: Thu, 29 Feb 2024 09:54:30 +0100 Subject: [PATCH] Cookbook Sorting - typo (#2118) MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Co-authored-by: Frédéric LOYER --- data/cookbook/sorting/sorting/00-stdlib.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/data/cookbook/sorting/sorting/00-stdlib.ml b/data/cookbook/sorting/sorting/00-stdlib.ml index e1fcf01c32..b3e1e93445 100644 --- a/data/cookbook/sorting/sorting/00-stdlib.ml +++ b/data/cookbook/sorting/sorting/00-stdlib.ml @@ -17,4 +17,4 @@ Defining a custom `compare` function (here a case insensitive string comparison) let compare_insensitive a b = compare (String.lowercase_ascii a) (String.lowercase_ascii b) let a = [| "ABC"; "BCD"; "abc"; "bcd" |] -let () = Array.compare_insensitive a +let () = Array.sort compare_insensitive a