on master help sign in
Remove unusable UNPACK pragma

--HG-- extra : convert_revision : a9aba7d6f43566104f02592aaea7c6cc429e064d

commit726410562576409294e66dc803faeed2008099c8 authorBryan O'Sullivan <bos@serpentine.com> dateFri 20 Aug 2010, 07:40 (16 years ago) parent74e246c
1 file changed+1−1
Data/Text/Lazy/Encoding/Fusion.hs+1−1
Data/Text/Lazy/Encoding/Fusion.hs+1−1
@@ -57,7 +57,7 @@ data S = S0
5757 | S3 {-# UNPACK #-} !Word8 {-# UNPACK #-} !Word8 {-# UNPACK #-} !Word8
5858 | S4 {-# UNPACK #-} !Word8 {-# UNPACK #-} !Word8 {-# UNPACK #-} !Word8 {-# UNPACK #-} !Word8
5959
60−data T = T {-# UNPACK #-} !ByteString {-# UNPACK #-} !S {-# UNPACK #-} !Int
60+data T = T !ByteString {-# UNPACK #-} !S {-# UNPACK #-} !Int
6161
6262-- | /O(n)/ Convert a lazy 'ByteString' into a 'Stream Char', using
6363-- UTF-8 encoding.