Storing integers in arrays is tricky; often the : terminator doesn't work.
Here's one way:
REBOL [ ]
myarray: array/initial [3 3] 0
col: 0
foreach row myarray [
change skip row col 1
col: col + 1]
print myarray
Russell, [EMAIL PROTECTED]
----- Original Message -----
From: <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Tuesday, October 12, 1999 10:19 PM
Subject: [REBOL] Arrays
> How do I access Arrays ??
>
> Consider the following code fragment
>
> ; define a 3 X 3 array
> myarray: array/initial [3 3] 0
>
> for i 1 3 1
> [
> marray/i/i: 1
> ]
>
> doesnt work ....
>
> for i 1 3 1
> [
> marray/1/1: 1
> ]
>
> does work
>
> for i 1 3 1
> [
> print marray/:i/:i
> ]
>
> works, but
>
> for i 1 3 1
> [
> marray/:i/:i: 1
> ]
>
> doesnt
>
> whats gong on ??
>
>
>
>