diff options
| author | Einhard Leichtfuß <alguien@respiranto.de> | 2025-05-20 22:34:12 +0200 |
|---|---|---|
| committer | Einhard Leichtfuß <alguien@respiranto.de> | 2025-05-20 22:36:50 +0200 |
| commit | 92f1f0486d7f39b12ebda685b0ed5ad3bf3d164a (patch) | |
| tree | 73f4896489c3e26fd6fcb881b8ceaaaf9d1a3f15 /src/Language/SimpleShell/Parser.hs | |
| parent | dfd8f3bd6b12dc19cd5c4951d05b8a2ae18ceda6 (diff) | |
Change relaxed expr parser implementationexperimental/relaxed-expr-parser-alt
Debatable whether better or worse.
Diffstat (limited to 'src/Language/SimpleShell/Parser.hs')
| -rw-r--r-- | src/Language/SimpleShell/Parser.hs | 6 |
1 files changed, 0 insertions, 6 deletions
diff --git a/src/Language/SimpleShell/Parser.hs b/src/Language/SimpleShell/Parser.hs index be16c9f..d75602b 100644 --- a/src/Language/SimpleShell/Parser.hs +++ b/src/Language/SimpleShell/Parser.hs @@ -4,7 +4,6 @@ module Language.SimpleShell.Parser ( Parser , lexeme , symbol - , commentFirstChars , lookupVar , lookupFun , declareVars @@ -51,17 +50,12 @@ initContext = Context } --- Must be kept in sync with 'commentFirstChars'. sc :: Parser () sc = L.space space1 (L.skipLineComment "//") (L.skipBlockComment "/*" "*/") --- | List of all characters that may start a comment. -commentFirstChars :: [Char] -commentFirstChars = "/" - lexeme :: Parser a -> Parser a lexeme = L.lexeme sc |