From 7639ac05500dafd7871bcbc35e3b2af00a079656 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Juan=20Manuel=20Tom=C3=A1s?= Date: Sun, 13 Oct 2024 03:55:39 -0300 Subject: Fix undefined function cursor --- core.lisp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/core.lisp b/core.lisp index 3d3f4e8..be12f99 100644 --- a/core.lisp +++ b/core.lisp @@ -48,8 +48,8 @@ (push r intermediate-parsers)) ((parsing-p r) (when (or (not (parsing-p result)) - (> (cursor (parsing-left r)) - (cursor (parsing-left result)))) + (> (input-cursor (parsing-left r)) + (input-cursor (parsing-left result)))) (setf result r))) ((failure-p r) (when (or (failure-p result) -- cgit v1.2.3