r-p-fetch:forth_usual — compiling primitive
FORTH
RP@ ( -- addr )();p4:"r-p-fetch";
RP@ ( -- addr )(
)
returns the return stack pointer
example: : R@ RP@ @ ;