mirrors/janet
1
0
Fork 0
mirror of https://github.com/janet-lang/janet synced 2025-12-04 07:38:09 +00:00
Code Issues 1 Releases Wiki Activity

Add parser/clone. (#120)

Browse Source
This commit is contained in:
Calvin Rose
2019-06-08 17:16:36 -04:00
parent 802a2d6b71
commit 43520ac67d
2 changed files with 72 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
test/suite6.janet
View File

@@ -109,4 +109,13 @@
(comment 1 2 3)
(comment 1 2 3 4)
# Parser clone
(def p (parser/new))
(assert (= 7 (parser/consume p "(1 2 3 ")) "parser 1")
(def p2 (parser/clone p))
(parser/consume p2 ") 1 ")
(parser/consume p ") 1 ")
(assert (deep= (parser/status p) (parser/status p2)) "parser 2")
(assert (deep= (parser/state p) (parser/state p2)) "parser 3")
(end-suite)