Source

ocamlspot / utils.mli

Diff from to

File utils.mli

   val map : f:('a -> 'b) -> 'a option -> 'b option
   val bind : 'a option -> ('a -> 'b option) -> 'b option
   val iter : f:('a -> unit) -> 'a option -> unit
+  val default : 'a -> 'a option -> 'a 
 end
 
 exception Finally of exn * exn