From e2344a5cb9f08ff7555835516d432845be10a365 Mon Sep 17 00:00:00 2001 From: Doug Coleman Date: Sat, 25 Feb 2023 13:13:29 -0600 Subject: [PATCH] parser: fix bad refactor --- core/parser/parser.factor | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/core/parser/parser.factor b/core/parser/parser.factor index 5d9901440e..38e78b7ab8 100644 --- a/core/parser/parser.factor +++ b/core/parser/parser.factor @@ -34,7 +34,7 @@ SYMBOL: auto-use? : private? ( word -- ? ) vocabulary>> ".private" tail? ; : use-first-word? ( words -- ? ) - [ length 1 = ] [ ?first dup or* [ private? not ] unless ] bi and + [ length 1 = ] [ ?first dup or* [ private? not ] when ] bi and auto-use? get and ; ! True branch is a singleton public word with no name conflicts -- 2.34.1