Skip to content
GitLab
Menu
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in
Toggle navigation
Menu
Open sidebar
Bernd Paysan
thinking-forth
Commits
4ff4f0b9
Commit
4ff4f0b9
authored
Apr 16, 2006
by
paysan
Browse files
Small change (body> instead of 2 cells -)
parent
18d39630
Changes
1
Hide whitespace changes
Inline
Side-by-side
chapter6.tex
View file @
4ff4f0b9
...
...
@@ -771,8 +771,8 @@ was purely instructional, to remind the programmer which vocabulary
was
\forth
{
CURRENT
}
, and which was
\forth
{
CONTEXT
}
:
\begin{Code}
: .context context @
2 cells -
>name id. ;
: .current current @
2 cells -
>name id. ;
: .context context @
body>
>name id. ;
: .current current @
body>
>name id. ;
\end{Code}
\goodbreak
\noindent
If you typed
...
...
@@ -793,7 +793,7 @@ factoring. It would have been possible to consolidate the repeated
passage into a third definition:
\begin{Code}
: .vocabulary ( pointer -- ) @
2 cells -
>name id. ;
: .vocabulary ( pointer -- ) @
body>
>name id. ;
\end{Code}
shortening the original definitions to:
...
...
@@ -811,7 +811,7 @@ definition, and let it take as an argument either the word
Applying the principles of good naming, I suggested:
\begin{Code}
: is ( adr -- ) @
2 cells -
>name id. ;
: is ( adr -- ) @
body>
>name id. ;
\end{Code}
allowing the syntax
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment