[up] [log] [?]
[first]  [entry] [exit]  [last]

(meg/match ~{:close (capture (backmatch :delim)) :main (sequence :thing -1) :open (capture (sequence "[" (some "_") "]") :delim) :thing (choice (unref (sequence :open :thing :close)) (capture (any (if-not "[" 1))))}
           "[__][_]a[_][__]")

captures and tags
captures: @["[__]" "[_]" "a" "[_]"]
tagged-captures:
  tags: @[:delim]
  values: @["[__]"]

current frame
status: exiting frame 15 with value: 11
peg: (choice (unref (sequence :open :thing :close)) (capture (any (if-not "[" 1))))
text: [__][_]a[_][__]
index: 4 advanced to: 11
matched: [_]a[_]

frames call stack
15 (choice (unref (sequence :open :thing :close)) (capture (any (if-not "[" 1))))
14 :thing
4 (sequence :open :thing :close)
3 (unref (sequence :open :thing :close))
2 (choice (unref (sequence :open :thing :close)) (capture (any (if-not "[" 1))))
1 :thing
0 (sequence :thing -1)