Re: Proposal: add fromRight and fromLeft to Data.Either

js :: a -> (Void, a) js x = (undefined, x) left :: (Void, Either a b) -> a left (_, Left x) = x There we go... now it looks truly terrifying: left.js $(myValue) (Apologies to Kosyrev for the double-send. Especially since that version was broken.) On Fri, May 20, 2016 at 2:36 PM, Kosyrev Serge <_deepfire@feelingofgreen.ru> wrote:

Dan Burton writes:

...

I wouldn't mind something like this being available... but only if prefixed with the word "unsafe" or "partial" or other such scary words.

Heh, `unsafePerformLeft` / `unsafePerformRight` ? : -)

-- с уважениeм / respectfully, Косырев Сергей _______________________________________________ Libraries mailing list Libraries@haskell.org http://mail.haskell.org/cgi-bin/mailman/listinfo/libraries