In section 4 of Starting Forth tutorial, the answer to the 5th question is:
: STAR [CHAR] * EMIT ;
: STARS ( #stars -- ) 0 ?DO STAR LOOP ;
: STARS ( n -- ) ?DUP IF STARS THEN ;
The third definition redefines STARS
word using previous definition.
Interpreter says:
redefined STARS ok
and as I type see
:
SEE STARS
: STARS
?dup
IF STARS
THEN ; ok
Why the former definition is still alive as the word STARS
as been replaced in the words dictionary? and is it possible to access/see the loop definition (the second one)?