Forth 2012: NR

Interpretation:

Interpretation semantics for this word are undefined.

Execution:

( -- i * x +n ) ( R: j * x +n -- )

Retrieve the items previously stored by an invocation of N>R. n is the number of items placed on the data stack. It is an ambiguous condition if NR> is used with data not stored by N>R.

See:

15.6.2.1908 N>R, A.15.6.2.1908 N>R.

Implementation:

This implementation depends on the return address being on the return stack.

: NR> \ -- xn .. x1 N ; R: x1 .. xn N --
\ Pull N items and count off the return stack.
   R> R> SWAP >R DUP
   BEGIN
      DUP
   WHILE
      R> R> SWAP >R -ROT
      1-
   REPEAT
   DROP
;