1
0
mirror of https://github.com/mgcaret/of816.git synced 2024-06-08 12:29:30 +00:00

minor help text updates

This commit is contained in:
mgcaret 2020-01-06 12:30:46 -08:00
parent ea5c795cfd
commit 2f0281a5d9

View File

@ -6769,7 +6769,7 @@ eword
; first we will scan the dictionary to see if the word to be forgotten is below ; first we will scan the dictionary to see if the word to be forgotten is below
; the protection bit, and if it is found before we match the XT, we don't allow the ; the protection bit, and if it is found before we match the XT, we don't allow the
; forget ; forget
; ( xt -- ) ; H: ( xt -- ) forget word referenced by xt and subsequent words
dword dFORGET,"$FORGET" dword dFORGET,"$FORGET"
ENTER ENTER
.dword DUP ; ( xt -- xt xt' ) .dword DUP ; ( xt -- xt xt' )
@ -6817,8 +6817,8 @@ cant: SLIT "Can't forget " ; ( xt -- xt str len )
eword eword
; H: ( "name"<> -- ) attempt to forget name and subsequent definitions in compiler ; H: ( "name"<> -- ) attempt to forget name and subsequent definitions in compiler
; H: word list. This may have unintended consequences if things like wordlists and such ; H: word list. This may have unintended consequences if things like wordlists and
; H: were defined after name. ; H: such were defined after name.
dword FORGET,"FORGET" dword FORGET,"FORGET"
ENTER ENTER
.dword PARSEFIND .dword PARSEFIND