Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
tree: 3141493c5c
Fetching contributors…

Cannot retrieve contributors at this time

executable file 19 lines (16 sloc) 0.481 kb
namespace FSharpKoans.Core
open System
type KoanResult =
| Success of string
| Failure of string * Exception
with
member this.Message =
match this with
| Success x -> x
| Failure (x, _) -> x
[<CompilationRepresentation(CompilationRepresentationFlags.ModuleSuffix)>]
module KoanResult =
let map f (x:KoanResult) =
match x with
| Success m -> Success <| f m
| Failure (m, e) -> Failure (f m, e)
Jump to Line
Something went wrong with that request. Please try again.