(load-file "rep.so") (setq rep-dir (vc-call-backend 'Git 'root default-directory)) (setq test-parser (rep-new-parser (with-temp-buffer (insert-file-contents (expand-file-name "test.abnf" (expand-file-name "abnf grammars" (expand-file-name "grammar" rep-dir)))) (buffer-string)))) (defvar input nil "A vector that represents a testing input.") (setq input (vector 3 0 2 2 2 1 1 1 0 1)) (rep-recognize test-parser input) (rep-parse test-parser input) ;; (rep-parse-string ;; test-parser ;; "* title\nprice: 512\nnote: this is a test\n") ;; (rep-parse-string ;; test-parser ;; "183t3ru")