textstring :: Parser ByteString
ptextstring = S.concat <$> many1 (hex_octet <|> takeWhile1 isSafeChar)

ptextstring :: Parser ByteString
ptextstring = S.concat <$> many1 (hex_octet <|> takeWhile1 isSafeChar)
ptextstring = S.concat <$> many1 (hex_octet <|> takeWhile1 isSafeChar)