aboutsummaryrefslogtreecommitdiff
path: root/testlabel.lua
diff options
context:
space:
mode:
Diffstat (limited to 'testlabel.lua')
-rw-r--r--testlabel.lua5
1 files changed, 3 insertions, 2 deletions
diff --git a/testlabel.lua b/testlabel.lua
index cbe623c..8cfb671 100644
--- a/testlabel.lua
+++ b/testlabel.lua
@@ -1,4 +1,4 @@
1local m = require 'lpeglabel' 1local m = require 'lpeglabelrec'
2 2
3local p, r, l, s, serror 3local p, r, l, s, serror
4 4
@@ -557,6 +557,7 @@ print("+")
557p = m.Rec("a", "b") 557p = m.Rec("a", "b")
558assert(p:match("a") == 2) 558assert(p:match("a") == 2)
559--assert(p:match("b") == 2) 559--assert(p:match("b") == 2)
560checkeqlab({nil, 0, "b"}, p:match("b"))
560checkeqlab({nil, 0, "c"}, p:match("c")) 561checkeqlab({nil, 0, "c"}, p:match("c"))
561 562
562p = m.Rec("a", "b", 3) 563p = m.Rec("a", "b", 3)
@@ -607,7 +608,7 @@ C -> c+
607]] 608]]
608g = m.P{ 609g = m.P{
609 "S", 610 "S",
610 S = m.Rec(m.V"A", (-m.P"c" * m.P(1))^0) * m.V"C", 611 S = m.Rec(m.V"A", (-m.P"c" * m.P(1))^0, 0) * m.V"C", --explicitly put 0 in Rec
611 A = m.P"a"^0 * m.P"b" + m.T(0), 612 A = m.P"a"^0 * m.P"b" + m.T(0),
612 C = m.P"c"^1, 613 C = m.P"c"^1,
613} 614}