utf8-light 0.4.0.1 → 0.4.1

raw patch · 2 files changed

+18/−2 lines, 2 filesdep ~base

Dependency ranges changed: base

Files

• src/Codec/Binary/UTF8/Light.hs +16/−0
• utf8-light.cabal +2/−2

@@ -251,15 +251,27 @@ -- can use Word# literalls -- ==> 0xff00ff00## encodeUTF8' ((W32# w):xs)+#if MIN_VERSION_base(4,7,0)+  | I# (w`ltWord#`(int2Word# 0x80#)) /= 0 =+#else   | w`ltWord#`(int2Word# 0x80#) =+#endif       [W8# w] : encodeUTF8' xs+#if MIN_VERSION_base(4,7,0)+  | I# (w`ltWord#`(int2Word# 0x800#)) /= 0 =+#else   | w`ltWord#`(int2Word# 0x800#) =+#endif       [ W8#(w`uncheckedShiftRL#`6#               `or#`(int2Word# 0xc0#))       , W8#(w`and#`(int2Word# 0x3f#)               `or#`(int2Word# 0x80#))       ] : encodeUTF8' xs+#if MIN_VERSION_base(4,7,0)+  | I# (w`ltWord#`(int2Word# 0xf0000#)) /= 0 =+#else   | w`ltWord#`(int2Word# 0xf0000#) =+#endif       [ W8#(w`uncheckedShiftRL#`12#               `or#`(int2Word# 0xe0#))       , W8#(w`uncheckedShiftRL#`6#@@ -268,7 +280,11 @@       , W8#(w`and#`(int2Word# 0x3f#)               `or#`(int2Word# 0x80#))       ] : encodeUTF8' xs+#if MIN_VERSION_base(4,7,0)+  | I# (w`ltWord#`(int2Word# 0xe00000#)) /= 0 =+#else   | w`ltWord#`(int2Word# 0xe00000#) =+#endif       [ W8#(w`uncheckedShiftRL#`18#               `or#`(int2Word# 0xf0#))       , W8#(w`uncheckedShiftRL#`12#

@@ -1,5 +1,5 @@ name:               utf8-light-version:            0.4.0.1+version:            0.4.1 cabal-version:      >= 1.6 build-type:         Simple license:            BSD3@@ -21,4 +21,4 @@  source-repository head   type:     git-  location: git://lambda.ath.cx/patrick/utf8-light+  location: https://github.com/parcs/utf8-light.git