fix bug in WORDLIST; remove immediacy from COMPILE,

This commit is contained in:
mgcaret 2020-10-29 23:19:44 -07:00
parent 494acab881
commit 955626713b
1 changed files with 2 additions and 3 deletions

View File

@ -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