3 lines
94 B
Forth
3 lines
94 B
Forth
create a 3 , 2 , 1 ,
|
|
: .array ( a len -- )
|
|
cells bounds do i @ . cell +loop ; \ 3 2 1
|