2 lines
52 B
Forth
2 lines
52 B
Forth
: times ( xt n -- )
|
|
0 ?do dup execute loop drop ;
|
: times ( xt n -- )
|
|
0 ?do dup execute loop drop ;
|