From 61c2b584f85e8862ea0fd3f7dc353b4b01608daf Mon Sep 17 00:00:00 2001 From: Bernd Paysan Date: Fri, 29 Dec 2017 00:01:16 +0100 Subject: [PATCH] name>comp not needed anymore --- kernel/recognizer.fs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/kernel/recognizer.fs b/kernel/recognizer.fs index 8bfea0ebb..7edc8d01f 100644 --- a/kernel/recognizer.fs +++ b/kernel/recognizer.fs @@ -44,7 +44,7 @@ AConstant rectype-null : do-lit, ( .. xt -- .. ) rectype>post execute ; : >postpone ( token table -- ) - dup >r name>comp drop do-lit, r> post, ; + dup >r do-lit, r> post, ; : rec-word ( addr u -- xt | rectype-null ) \G Searches a word in the wordlist stack