diff options
Diffstat (limited to 'src/Data/BEncode.hs')
-rw-r--r-- | src/Data/BEncode.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/Data/BEncode.hs b/src/Data/BEncode.hs index d7595a9..1601fd1 100644 --- a/src/Data/BEncode.hs +++ b/src/Data/BEncode.hs | |||
@@ -147,9 +147,9 @@ type BKey = ByteString | |||
147 | -- Lists is not required to be sorted through. | 147 | -- Lists is not required to be sorted through. |
148 | -- | 148 | -- |
149 | data BEncode = BInteger !BInteger -- ^ bencode integers; | 149 | data BEncode = BInteger !BInteger -- ^ bencode integers; |
150 | | BString {-# UNPACK #-} !BString -- ^ bencode strings; | 150 | | BString !BString -- ^ bencode strings; |
151 | | BList BList -- ^ list of bencode values; | 151 | | BList BList -- ^ list of bencode values; |
152 | | BDict BDict -- ^ bencode key-value dictionary. | 152 | | BDict BDict -- ^ bencode key-value dictionary. |
153 | deriving (Show, Read, Eq, Ord) | 153 | deriving (Show, Read, Eq, Ord) |
154 | 154 | ||
155 | instance NFData BEncode where | 155 | instance NFData BEncode where |