hpage-0.1.6: src/HPage/Test/Extensions/FlexibleInstances.hs

instance Functor (Either Int) where 
    fmap _ (Left n)  = Left n 
    fmap f (Right r) = Right (f r)