From 0f34d9a931791406d2cabf282742530195f71927 Mon Sep 17 00:00:00 2001 From: DJ O'Leary Date: Mon, 8 Dec 2025 01:55:28 +0100 Subject: refactor(2025,ocaml): use result type for answers to allow for returning errors --- 2025/ocaml/test/application/test_d04p01.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to '2025/ocaml/test/application/test_d04p01.ml') diff --git a/2025/ocaml/test/application/test_d04p01.ml b/2025/ocaml/test/application/test_d04p01.ml index 783659e..ffbe102 100644 --- a/2025/ocaml/test/application/test_d04p01.ml +++ b/2025/ocaml/test/application/test_d04p01.ml @@ -14,7 +14,7 @@ let example = let test_input_to_matrix have want () = Alcotest.(check int) "number of rolls of paper that are accessible" want - @@ solve have () + @@ match solve have () with Error _ -> 0 | Ok ans -> ans let () = let open Alcotest in -- cgit v1.2.3