Skip to content

Instantly share code, notes, and snippets.

@SteveGilham
Created April 26, 2015 14:02
Show Gist options
  • Save SteveGilham/737d12bdbb1046e18b40 to your computer and use it in GitHub Desktop.
Save SteveGilham/737d12bdbb1046e18b40 to your computer and use it in GitHub Desktop.
I/O monad definition
type 'a io = IO of (unit -> 'a)
exception IOFailure
let RunIO (IO f) = f();;
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment