[up] [log] [?]
[first]  [entry] [exit] [next] [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[_][__]")
# =>
@["[__]" "[_]" "a" "[_]" "[__]"]

captures and tags
captures: @["[__]" "[_]" "a" "[_]" "[__]"]

current frame
status: exiting frame 0 with value: 15
peg: (sequence :thing -1)
text: [__][_]a[_][__]
index: 0 advanced to: 15
matched: [__][_]a[_][__]

frames call stack
0 (sequence :thing -1)