Loops/Foreach: Difference between revisions
Content deleted Content added
Line 1,280:
<lang forth>: FOREACH ( array size XT --)
>R \ save execution token on return stack
CELLS BOUNDS \
BEGIN
2DUP > \ test addresses
|