From fd94a9d8a3e4fc86e5128715a2bc68187c872970 Mon Sep 17 00:00:00 2001
From: Einhard Leichtfuß <alguien@respiranto.de>
Date: Tue, 20 May 2025 19:40:53 +0200
Subject: Reduce name parsers to nameP

There is no good reason to have different syntax for variable and
function names, for example.
---
 src/Language/SimpleShell/Parser/Name.hs | 11 +----------
 1 file changed, 1 insertion(+), 10 deletions(-)

(limited to 'src/Language/SimpleShell/Parser/Name.hs')

diff --git a/src/Language/SimpleShell/Parser/Name.hs b/src/Language/SimpleShell/Parser/Name.hs
index 635d987..14f4d2e 100644
--- a/src/Language/SimpleShell/Parser/Name.hs
+++ b/src/Language/SimpleShell/Parser/Name.hs
@@ -1,12 +1,10 @@
 module Language.SimpleShell.Parser.Name
-  ( varNameP
-  , funNameP
+  ( nameP
   , keyword
   )
 where
 
 
-import Language.SimpleShell.AST.Name (FunName, VarName)
 import Language.SimpleShell.Parser (Parser, lexeme)
 
 import Control.Monad (void)
@@ -31,10 +29,3 @@ nameP =
 keyword :: Text -> Parser ()
 keyword kw =
   void $ lexeme $ try $ string kw <* notFollowedBy (satisfy isNameChar)
-
-
-varNameP :: Parser VarName
-varNameP = nameP
-
-funNameP :: Parser FunName
-funNameP = nameP
-- 
cgit v1.2.3