>R >NUMBER >WORDLIST
>R
* >R ( value -- )

save the value onto the return stack. The return
stack must be returned back to clean state before
an exit and you should note that the return-stack
is also touched by the >DO ... >WHILE loop.
Use >R> to clean the stack and >R@ to get the
last value put by >>R

core ordinary primitive