janet/tools/afl/parser_runner.janet

5 lines
118 B
Plaintext
Raw Normal View History

2019-11-29 03:41:27 +00:00
(def p (parser/new))
(parser/consume p (slurp ((dyn :args) 1)))
(while (parser/has-more p)
(pp (parser/produce p)))