git.iko.soy/text
on master help sign in
Make UnicodeException an instance of Eq.
6cff0e0Bryan O'Sullivan
Data/Text/Encoding/Error.hs+1−1
compare with master
unifiedsplit
@@ -77,7 +77,7 @@ data UnicodeException =
77 | EncodeError String (Maybe Char)
77 | EncodeError String (Maybe Char)
78 -- ^ Tried to encode a character that could not be represented
78 -- ^ Tried to encode a character that could not be represented
79 -- under the given encoding, or ran out of input in mid-encode.
79 -- under the given encoding, or ran out of input in mid-encode.
80− deriving (Typeable)
80+ deriving (Eq, Typeable)
81
81
82showUnicodeException :: UnicodeException -> String
82showUnicodeException :: UnicodeException -> String
83showUnicodeException (DecodeError desc (Just w))
83showUnicodeException (DecodeError desc (Just w))