Make Encoding an instance of the usual suspects
--HG--
extra : convert_revision : 94a162ac7d0df22f6df4cc1d85d1af176f45cd8e
commitb70ca4c4b0a44aecdcd21848e53cc49bde7f7409
authorBryan O'Sullivan <bos@serpentine.com>
dateMon 19 Jan 2009, 10:45 (18 years ago)
parent79ee891
Data/Text/Fusion.hs+1
@@ -44,6 +44,7 @@ data Step s a = Done
4444 | Yield !a !s
4545
4646data Encoding = ASCII | Utf8 | Utf16BE | Utf16LE | Utf32BE | Utf32LE
47+ deriving (Read, Show, Eq)
4748
4849-- | /O(n)/ Convert a Text into a Stream Char.
4950stream :: Text -> Stream Char