fix stack notation for $2VALUE

This commit is contained in:
mgcaret 2020-01-21 23:41:07 -08:00
parent d2e032a559
commit 3657b78e33
2 changed files with 3 additions and 3 deletions

View File

@ -5783,7 +5783,7 @@ dword IS_USER_WORD,"(IS-USER-WORD)"
EXIT
eword
; H: ( n str len ) create a definition that pushes the first cell of the body, initially n
; H: ( n str len -- ) create a definition that pushes the first cell of the body, initially n
dword dVALUE,"$VALUE"
jsr _3parm ; avoid dictionary corruption from stack underflow
jsr _mkentry

View File

@ -1,6 +1,6 @@
# Forth Dictionary
Updated: 2020-01-21 23:37:36 -0800
Updated: 2020-01-21 23:40:51 -0800
## !
@ -106,7 +106,7 @@ by an existing buffer, free it.
## $VALUE
( n str len ) create a definition that pushes the first cell of the body, initially n
_( n str len -- )_ create a definition that pushes the first cell of the body, initially n
## '