(use setup-api)

(define chicken-parse (make-pathname (program-path) "chicken-parse"))

(run (,chicken-parse -rxP simple.syntax <simple.tests))
(run (,chicken-parse -rP fp.syntax <mm.fp))
(run (,chicken-parse -c nocomment.syntax >nocomment.syntax.scm))
(compile uncomment.scm -Mb -d0) 
(run (./uncomment <nocomment.syntax))
(run (,chicken-parse -xP cxx.syntax <hello.c))