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 ??
> 
> 
> 
> 

Reply via email to