diff options
| author | Juan Manuel Tomás <jtomas1815@gmail.com> | 2026-06-27 16:32:43 -0300 |
|---|---|---|
| committer | Juan Manuel Tomás <jtomas1815@gmail.com> | 2026-06-27 16:32:43 -0300 |
| commit | 7e2f822e0ec6d55c09784fc0b3d7b2cf5797c890 (patch) | |
| tree | e8718480c4bf5219e1bbf9d3f2efd6b6a0956b14 /main.lisp | |
| parent | 8a97d64adef87a9f12824c5653bc5182b9a4f06d (diff) | |
| download | monparser-7e2f822e0ec6d55c09784fc0b3d7b2cf5797c890.tar.gz monparser-7e2f822e0ec6d55c09784fc0b3d7b2cf5797c890.zip | |
Use result-place instead of failure-place
Diffstat (limited to 'main.lisp')
| -rw-r--r-- | main.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -9,7 +9,7 @@ (lambda (input) (let ((result (funcall p input))) (if (failure-p result) - (make-failure :place (failure-place result) + (make-failure :place (result-place result) :message (concatenate 'string message (failure-message result)) :priority (failure-priority result)) result)))) |