* I ( -- value ) returns the index-value of the innermost DO .. LOOP
I
( -- value )
DO
LOOP
FORTH/ANS core (dpANS.6.1.1680) compiling primitive