runParser' :: Parser' a -> B.ByteString
           -> Either ParseError (a, B.ByteString)
runParser' p =
  E.runExcept . S.runStateT (runP' p)
runParser' :: Parser' a -> B.ByteString
           -> Either ParseError (a, B.ByteString)
runParser' p =
  E.runExcept . S.runStateT (runP' p)
runParser' p =
  E.runExcept . S.runStateT (runP' p)