Remove useless comments.

src/DomainParser.purs

@@ -114,22 +114,3 @@ sub_eof = do
 -- | has to be differenciated from a "relative" name (www).
 domain :: Parser String
 domain = (string " " *> eof) <|> sub_eof
-
-{-
-import Data.Either (Either(..))
--- import Data.String.Regex as R
--- import Data.String.Regex.Flags as RF
-import Data.Tuple (Tuple(..))
-import Parsing.Combinators.Array (many1)
-import Parsing.Combinators as PC
-import Parsing (Parser, fail, runParser)
-import Parsing.String.Basic (alphaNum, letter)
-import Parsing.String (char, string, eof)
-
-
--- | Converting a single letter parser to a String parser.
-char_to_string :: Parser String Char -> Parser String String
-char_to_string p = do
-  character <- p
-  pure $ CU.singleton character
--}