Fix test that relied on the disappeared encodeASCII
--HG--
extra : convert_revision : 3f360fa398db3f03c7cbd971dd0d2cf55416fdb4
commite5250f0da0d57bfd21aafff98fe4dc8eb96117f4
authorBryan O'Sullivan <bos@serpentine.com>
dateTue 24 Feb 2009, 06:22 (18 years ago)
parent74eaa00
tests/Properties.hs+1−1
@@ -38,7 +38,7 @@ prop_stream_unstream t = (unstream . stream) t == t
3838prop_reverse_stream t = (S.reverse . S.reverseStream) t == t
3939prop_singleton c = [c] == (unpack . T.singleton) c
4040
41−prop_ascii t = E.decodeASCII (E.encodeASCII a) == a
41+prop_ascii t = E.decodeASCII (E.encodeUtf8 a) == a
4242 where a = T.map (\c -> chr (ord c `mod` 128)) t
4343prop_utf8 = (E.decodeUtf8 . E.encodeUtf8) `eq` id
4444prop_utf16LE = (E.decodeUtf16LE . E.encodeUtf16LE) `eq` id