retroforth/example/TopOfAddressStack.forth
crc 6974fb30d0 Remove tors
FossilOrigin-Name: f27d20c489355064706329045d1a3f6c0c3c64fe2e679e48f06edba06b6554b1
2018-06-20 13:13:43 +00:00

7 lines
194 B
Forth

Short for *top of return stack*, this returns the top item on the
address stack. As an analog to traditional Forth, this is equivilent
to `R@`.
~~~
:tors (-n) pop pop dup push swap push ;
~~~