git.iko.soy/text
on master help sign in
Make older Num classes happy
3e60a36Bryan O'Sullivan
Data/Text/Encoding.hs+2−2
compare with master
unifiedsplit
@@ -203,8 +203,8 @@ instance Show Decoding where
203 showString "Some " . showsPrec (prec+1) t
203 showString "Some " . showsPrec (prec+1) t
204 where prec = 10
204 where prec = 10
205
205
206−newtype CodePoint = CodePoint Word32 deriving (Num, Storable)
206+newtype CodePoint = CodePoint Word32 deriving (Eq, Show, Num, Storable)
207−newtype DecoderState = DecoderState Word32 deriving (Eq, Num, Storable)
207+newtype DecoderState = DecoderState Word32 deriving (Eq, Show, Num, Storable)
208
208
209-- | Decode, in a stream oriented way, a 'ByteString' containing UTF-8
209-- | Decode, in a stream oriented way, a 'ByteString' containing UTF-8
210-- encoded text that is known to be valid.
210-- encoded text that is known to be valid.