@@ -267,7 +267,6 @@ skipWhile p = do
267267 if B.null t
268268 then (skipWhile p <|> return ())
269269 else return ()
270−{-# INLINE skipWhile #-}
271270
272271takeTill :: (Word8 -> Bool) -> Parser B.ByteString
273272takeTill p = takeWhile (not . p)
@@ -283,7 +282,6 @@ takeWhile p = go
283282 if B.null t
284283 then (h+++) `fmapP` (go <|> return B.empty)
285284 else return h
286−{-# INLINE takeWhile #-}
287285
288286takeWhile1 :: (Word8 -> Bool) -> Parser B.ByteString
289287takeWhile1 p = do
@@ -294,7 +292,6 @@ takeWhile1 p = do
294292 if B.null t
295293 then (h+++) `fmapP` (takeWhile p <|> return B.empty)
296294 else return h
297−{-# INLINE takeWhile1 #-}
298295
299296-- | Match any character in a set.
300297--