summaryrefslogtreecommitdiff
path: root/core.lisp
diff options
context:
space:
mode:
authorJuan Manuel Tomás <jtomas1815@gmail.com>2026-03-23 07:49:34 -0300
committerJuan Manuel Tomás <jtomas1815@gmail.com>2026-03-23 07:49:34 -0300
commit3df2ac55e233574a08b938f29f846069f3776e42 (patch)
treeb0ca97029205c6a832948bc377b55f061f25044c /core.lisp
parentd08d5b232d74f3a75a833b231c4ef5e80870c993 (diff)
downloadmonparser-3df2ac55e233574a08b938f29f846069f3776e42.tar.gz
monparser-3df2ac55e233574a08b938f29f846069f3776e42.zip
A couple fixes and expose new
Diffstat (limited to 'core.lisp')
-rw-r--r--core.lisp3
1 files changed, 2 insertions, 1 deletions
diff --git a/core.lisp b/core.lisp
index b7b204a..968a7d9 100644
--- a/core.lisp
+++ b/core.lisp
@@ -84,6 +84,7 @@
:message "No matches."))
((and all (cursor-has-data? (result-place (first result))))
(make-failure :place (result-place (first result))
- :message "Input not exausted."))
+ :message "Input not exausted."
+ :priority 1))
(t (make-parsing :place (result-place (first result))
:tree (reverse (mapcar (lambda (x) (parsing-tree x)) result))))))))