Add unit test for ch

2022-08-19 16:23:31 +02:00
parent b8ab82f95c
commit e5bf85a551
1 changed files with 6 additions and 8 deletions
--- a/src_v2/parser/parser_internals.nim
+++ b/src_v2/parser/parser_internals.nim
@@ -244,12 +244,10 @@ let parseBetweenPair* = proc(delimiterParser: parserFnT): parserFnT {.closure.}
 # -- Tests

 when isMainModule:
-  let test1 = initParserResult("123")
+  let testParser123 = initParserResult("123")

-  let ch1 = ch('1')
-  let chDigits = @[ch(Digits)]
-
-  # echo type ch1
-  # echo test1.flatMap((x: Parser) => ParserResult.ok(x))
-  echo test1.flatMap(newlineParser)
-  # .flatMap(ch1)
+  block testBlockChar:
+    let ch1 = ch('1')
+    let chDigits = ch(Digits)
+    assert testParser123.flatMap(ch1).tokensToString() == "1"
+    assert testParser123.flatMap(chDigits).tokensToString() == "1"