diff options
| author | Einhard Leichtfuß <alguien@respiranto.de> | 2025-05-20 19:40:53 +0200 |
|---|---|---|
| committer | Einhard Leichtfuß <alguien@respiranto.de> | 2025-05-20 22:36:30 +0200 |
| commit | fd94a9d8a3e4fc86e5128715a2bc68187c872970 (patch) | |
| tree | acee31c8049cbcd6b8c73c7e55192eca1203486b /src/Language/SimpleShell/Parser/Name.hs | |
| parent | b40c163b40615ccd46a80d9119262f9c386bac63 (diff) | |
Reduce name parsers to nameP
There is no good reason to have different syntax for variable and
function names, for example.
Diffstat (limited to 'src/Language/SimpleShell/Parser/Name.hs')
| -rw-r--r-- | src/Language/SimpleShell/Parser/Name.hs | 11 |
1 files changed, 1 insertions, 10 deletions
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 |