ocaml
0
fork

Configure Feed

Select the types of activity you want to include in your feed.

remove duplicate functions from List_util

-8
-8
lib/prelude/List_util.ml
··· 22 22 let partition_fold_error : 23 23 ('a -> ('b list, 'c list) result) -> 'a list -> 'b list * 'b list = 24 24 fun f xs -> error_partition f xs |> Pair.map_snd List.concat 25 - 26 - let rec prepend_to_all sep = function 27 - | [] -> [] 28 - | x :: xs -> sep :: x :: prepend_to_all sep xs 29 - 30 - let intersperse sep = function 31 - | [] -> [] 32 - | x :: xs -> x :: prepend_to_all sep xs