@@ -82,9 +82,8 @@ import Prelude hiding (takeWhile)
8282type ParseError = String
8383
8484-- State invariants:
85−-- * If the strict bytestring is empty, the entire input is considered
86−-- to be empty.
87−-- * Otherwise, the strict bytestring must not be empty.
85+-- * If both strict and lazy bytestrings are empty, the entire input
86+-- is considered to be empty.
8887data S = S {-# UNPACK #-} !SB.ByteString
8988 LB.ByteString
9089 {-# UNPACK #-} !Int64