@@ -1500,10 +1500,10 @@ data WordFramedState s b =
15001500--
15011501{-# INLINE wordFramedBy #-}
15021502wordFramedBy :: Monad m =>
1503− (a -> Bool) -- ^ Escape
1504− -> (a -> Bool) -- ^ left quote
1505− -> (a -> Bool) -- ^ right quote
1506− -> (a -> Bool) -- ^ word seperator
1503+ (a -> Bool) -- ^ Matches escape elem?
1504+ -> (a -> Bool) -- ^ Matches left quote?
1505+ -> (a -> Bool) -- ^ matches right quote?
1506+ -> (a -> Bool) -- ^ matches word seperator?
15071507 -> Fold m a b
15081508 -> Parser a m b
15091509wordFramedBy isEsc isBegin isEnd isSep