mbarbin / mdexp / 26

coverage: 96.012% (-0.2%) from 96.244%
26

Pull #9

github

web-flow 
Merge 48a122b81 into ddacf7953
Pull Request #9: Improve intro book

163 of 175 new or added lines in 4 files covered. (93.14%)

1854 of 1931 relevant lines covered (96.01%)

492.18 hits per line

Source File
Press 'n' to go to next uncovered line, 'b' for previous

83.33
/src/stdlib/list0.ml
1 
(***************************************************************************************)
2 
(*  mdexp-stdlib - Extending OCaml's Stdlib for Mdexp                                  *)
3 
(*  SPDX-FileCopyrightText: 2025-2026 Mathieu Barbin <mathieu.barbin@gmail.com>        *)
4 
(*  SPDX-License-Identifier: MIT OR LGPL-3.0-or-later WITH LGPL-3.0-linking-exception  *)
5 
(***************************************************************************************)
6 









7



include ListLabels










8












9



let iter l ~f = iter l ~f




3,261✔





10



let map l ~f = map l ~f




375✔





11



let fold_left l ~init ~f = fold_left l ~init ~f




359✔





12












13



let rec last_exn = function











NEW


14



  | [] -> invalid_arg "List.last_exn: empty list"




×








15



  | [ x ] -> x




4✔






16



  | _ :: tl -> last_exn tl




4✔





17



;;
























    

  • 

    •