title: Processing block parameter with word types in red / rebol
body: <p>When calling:</p>
  
  <pre><code>f [(h test) (h test2)]
  </code></pre>
  
  <p>I want to get:</p>
  
  <pre><code>"&lt;p&gt;&lt;h1&gt;test&lt;/h1&gt;&lt;h1&gt;test2&lt;/h1&gt;&lt;/p&gt;"
  </code></pre>
  
  <p>Instead I get:</p>
  
  <pre><code>"&lt;h1&gt;test2&lt;/h1&gt;&lt;/p&gt;"
  </code></pre>
  
  <p>I can't see why my code below doesn't work. Note that I want to use g function below because I have several h like functions, g is called by each of them to factorize them. So don't get rid off g, it's on purpose.</p>
  
  <pre><code>html: copy ""
  emit: func [code] [repend html code] 
  
  f: func [param [block!]] [
      html: copy ""
      emit: func [code] [repend html code]  
      emit &lt;p&gt;
      foreach p param [
          emit p
      ]
      emit &lt;/p&gt;
      return html
  ]
  
  g: func ['arg [string! word!] /local html] [  
      return h :arg
  ]
  
  h: func ['arg [string! word!]] [
      either word? arg [
          text: to-string arg
      ][
          text: arg
      ]
  
      html: copy ""
      emit: func [code] [repend html code]  
  
      print text
      emit &lt;h1&gt;
      emit text
      emit &lt;/h1&gt;
      return html
  ]
  
  f [(h test) (h test2)]
  </code></pre>
  
  <p>Update:</p>
  
  <p>Now I get error in red: 
   Script Error: html is not in the specified context</p>
  
  <pre><code>  f: func[param [block!] /local html][
        html: copy ""
        emit: func [code] [repend html code]  
        emit &lt;p&gt;
        foreach p param [
            emit p
        ]
        emit &lt;/p&gt;
        return html
    ]
  
    g: func['arg [string! word!] /local html][  
      return h :arg
    ]
  
  
    h: func['arg [string! word!] /local html][
  
        either word? arg [text: to-string arg][
          text: arg
        ]
  
  
        html: copy ""
        emit: func [code] [repend html code]  
  
        print text
        emit &lt;h1&gt;
        emit text
        emit &lt;/h1&gt;
  
        return html
  
    ]
  
    f [(h test) (h test2)]
  </code></pre>