From a92e0ccd14bedc50716fdc0e680ddfdb64fb2a50 Mon Sep 17 00:00:00 2001 From: John Benediktsson Date: Fri, 4 Feb 2022 21:31:07 -0800 Subject: [PATCH] listener: rename (listener) to listener-loop --- basis/listener/listener.factor | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/basis/listener/listener.factor b/basis/listener/listener.factor index ed0f8db09b..8d89e3ddd4 100644 --- a/basis/listener/listener.factor +++ b/basis/listener/listener.factor @@ -138,8 +138,8 @@ t error-summary? set-global if ] recover ; -: (listener) ( datastack -- ) - listener-step (listener) ; +: listener-loop ( datastack -- ) + listener-step listener-loop ; PRIVATE> @@ -222,7 +222,7 @@ SYMBOL: interactive-vocabs : listener ( -- ) [ parser-quiet? off - [ { } (listener) ] with-return + [ { } listener-loop ] with-return ] with-interactive-vocabs ; : listener-main ( -- ) -- 2.34.1