From 829be331680b814f2049e363aef9fb98d5708087 Mon Sep 17 00:00:00 2001
From: Philippe Pittoli <karchnu@karchnu.fr>
Date: Sat, 13 Jan 2024 01:45:19 +0100
Subject: [PATCH] Remove useless comments.

---
 src/DomainParser.purs | 19 -------------------
 1 file changed, 19 deletions(-)

diff --git a/src/DomainParser.purs b/src/DomainParser.purs
index c643197..82651d8 100644
--- a/src/DomainParser.purs
+++ b/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
--}