From: Ralph Ronnquist Date: Sat, 12 Jun 2021 12:48:45 +0000 (+1000) Subject: upgrade X-Git-Url: https://git.rrq.au/?a=commitdiff_plain;h=3080215f0d03403858b04f5bab8332a9b66a4adf;p=rrq%2Frrqforth.git upgrade --- diff --git a/reference.html b/reference.html index 04da373..9cb4b59 100644 --- a/reference.html +++ b/reference.html @@ -770,12 +770,18 @@ asciidoc.install(); !   C@   C!   +W@   +W!   +D@   +D!   2@   2!   !+   @n++   @n--   C,   +W,   +D,   S"   >R   R@   @@ -1142,6 +1148,52 @@ at the current free head address, which also is incremented.

_______________________________________________________
+

+ +
+

Word: W,

+
+
+
Data stack: ( v -- )
+
+

"W," (W-comma) is a function word that puts a "word" (double-byte) on +the HERE heap. The two least significant bytes of the value +are put at the current free head address, which also is incremented +accordingly.

+
+
+
+
+
Definition concept for W,
+

: W, HERE @ 2 ALLOT W! ;

+
+
+
+_______________________________________________________ +
+

+
+
+

Word: D,

+
+
+
Data stack: ( v -- )
+
+

"D," (D-comma) is a function word that puts a "double word" +(double-byte) on the HERE heap. The four least significant +bytes of the value are put at the current free head address, which +also is incremented accordingly.

+
+
+
+
+
Definition concept for D,
+

: D, HERE @ 4 ALLOT D! ;

+
+
+
+_______________________________________________________ +

@@ -1174,6 +1226,32 @@ _______________________________________________________
_______________________________________________________
+

+
+
+

Word: W@

+
+
+
Data stack: ( a -- v )
+
+

"W@" is a function word that pushes the "word" (double-byte) value v +from the address a.

+
+_______________________________________________________ +
+

+
+
+

Word: R@

+
+
+
Data stack: ( -- v )   Return stack: ( v -- v )
+
+

"R@" is a function word that "copies" the top return stack value onto +the data stack.

+
+_______________________________________________________ +

@@ -1187,10 +1265,36 @@ significant byte of the cell) at the address a.

_______________________________________________________
+

+ +
+

Word: W!

+
+
+
Data stack: ( v a -- )
+
+

"W!" is a function word that stores the "word" (2-byte) value v (the +two least significant bytes of the cell) at the address a.

+
+_______________________________________________________ +
+

+
+
+

Word: D!

+
+
+
Data stack: ( v a -- )
+
+

"D!" is a function word that stores the "doublw word" (4-byte) value v +(the four least significant bytes of the cell) at the address a.

+
+_______________________________________________________ +

-

Word: R@

+

Word: R@

Data stack: ( -- v )   Return stack: ( v -- v )
@@ -3726,7 +3830,7 @@ is deepest.

diff --git a/rrqforth b/rrqforth index 729f1bb..0e97713 100755 Binary files a/rrqforth and b/rrqforth differ