withString :: (String -> Parser a) -> Value -> Parser a
withString p = withText (p . T.unpack)
withString :: (String -> Parser a) -> Value -> Parser a
withString p = withText (p . T.unpack)
withString p = withText (p . T.unpack)