artur-s · August 29, 2015 14:07
diff --git a/OptionHelpers.fs b/OptionHelpers.fs
 module Option

 let Else second = function
    | Some _ as first -> first
    | None -> second

 let ofNullable = function 
    | null -> None 
    | i -> Some i

 let filter p = function
    | Some v -> if p v then Some v else None
    | _ -> None
	module Option

	let Else second = function
	\| Some _ as first -> first
	\| None -> second

	let ofNullable = function
	\| null -> None
	\| i -> Some i

	let filter p = function
	\| Some v -> if p v then Some v else None
	\| _ -> None
No results found