title: Parallel list assignment in Red language
body: <p>I have 2 lists: </p>
  
  <pre><code>alist: [a b c d]
  blist: [1 2 3 4]
  </code></pre>
  
  <p>(In reality they are long lists). How can I assign variables in alist to corresponding values in blist in one go? Hence a becomes 1, b becomes 2 and so on.</p>
  
  <p>I tried:</p>
  
  <pre><code>foreach i alist j blist [i: j]
  </code></pre>
  
  <p>But it give following error: </p>
  
  <pre><code>*** Script Error: j has no value
  *** Where: foreach
  *** Stack: 
  </code></pre>
  
  <p>I also tried: </p>
  
  <pre><code>i: 1
  while [true] [ 
      if i &gt; (length? alist) [break]
      alist/i: blist/i  
      i: i + 1
  ]
  </code></pre>
  
  <p>But it also does not work: </p>
  
  <pre><code>*** Script Error: cannot set none in path alist/i:
  *** Where: set-path
  *** Stack: 
  </code></pre>
  
  <p><code>alist/i</code> and <code>blist/i</code> return <code>none</code> (on checking with print command).</p>
  
  <p>Similar question are there for other languages also, e.g.: <a href="https://stackoverflow.com/questions/2182563/parallel-array-assignment-in-php">Parallel array assignment in PHP</a> and <a href="https://stackoverflow.com/questions/5917684/parallel-assignment-in-java">Parallel assignment in Java?</a> . Thanks for your help.</p>