artagnon/either.hs

Created April 9, 2017 00:02

Star () You must be signed in to star a gist
Fork () You must be signed in to fork a gist

Learn more about clone URLs
Clone this repository at <script src="https://gist.github.com/artagnon/04e3d0c56940f23eda1f2ea0856d1454.js"></script>
Save artagnon/04e3d0c56940f23eda1f2ea0856d1454 to your computer and use it in GitHub Desktop.

Download ZIP

Either is not a problem in practice

Raw

	do res <- try (f a)
	case res of
	Left (ex :: IOException) -> mapMFirst f as
	Right res -> return $ Just res

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment