From 955626713b2c92109181015fec1e51ecb2246bff Mon Sep 17 00:00:00 2001 From: mgcaret Date: Thu, 29 Oct 2020 23:19:44 -0700 Subject: [PATCH] fix bug in WORDLIST; remove immediacy from COMPILE, --- asm/forth-dictionary.s | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/asm/forth-dictionary.s b/asm/forth-dictionary.s index d679bc9..fa717ad 100644 --- a/asm/forth-dictionary.s +++ b/asm/forth-dictionary.s @@ -1303,8 +1303,8 @@ dword COMMA,"," eword ; H: ( xt -- ) Compile xt into the dictionary. -; immediacy called out in IEEE 1275-1994 -dword COMPILECOMMA,"COMPILE,",F_IMMED +; immediacy called out in IEEE 1275-1994, but that conflicts with standards and usage +dword COMPILECOMMA,"COMPILE," bra COMMA::code eword @@ -6509,7 +6509,6 @@ dword WORDLIST,"WORDLIST" ENTER ONLIT H_FORTH ; root of all dictionaries .dword dCREATE_WL - .dword 0 EXIT eword