Learning PEGs in Janet

PEGs in Janet slides

(peg/match '(capture 0) "abc") #-> ""
(peg/match '(capture 1) "abc") #-> "a"
(peg/match '(capture 2) "abc") #-> "ab"
(peg/match '(capture 3) "abc") #-> "abc"
(peg/match '(capture 4) "abc") #-> nil
(peg/match '(capture -1) "abc") #-> nil
~(repeat 3 :w) "abcd" #-> "abc"
~(repeat 3 :w) "ab" #-> nil

~(between 2 3 :w) "abcd" #-> "abc"
~(between 2 3 :w) "ab" #-> "ab"
~(between 2 3 :w) "a" #-> nil
~(any (capture :w)) "abc" #->