
<div dir="ltr"><div>So I am trying to pass around a list (string * link) to a function that will make the string a clickable link, however I run into this error.</div><div><br></div><div><br></div><div><div>fun some () : transaction page = return <xml></xml></div><div>fun anot () : transaction page = return <xml></xml></div><div><br></div><div>fun link_list (l : list (string * (transaction page))) : xbody =</div><div>    <xml></div><div>      {List.mapX (fn (s,p) => <xml><a link={p}>{[s]}</a></xml>) l}</div><div>    </xml></div><div><br></div><div>fun main () : transaction page =</div><div>    return <xml></div><div>      <body></div><div><span class="gmail-Apple-tab-span" style="white-space:pre"> </span>{link_list (("sm", some ()) :: ("anot", anot ()) :: [])}</div><div>      </body></div><div>    </xml></div></div><div><br></div><div><br></div><div><div>make -k</div><div>urweb main</div><div>/Users/ace/src/link_test/main.ur:7:44: (to 7:45) Invalid Link expression</div><div>Expression UNBOUND_0</div><div>make: *** [all] Error 1</div></div></div>