mirror of
https://github.com/mgcaret/of816.git
synced 2024-12-27 19:29:58 +00:00
fix bug in WORDLIST; remove immediacy from COMPILE,
This commit is contained in:
parent
494acab881
commit
955626713b
@ -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
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user