view tests/firebug.ur @ 1614:efe1a2e9e4de

Support 'safeGet' in demos
author Adam Chlipala <adam@chlipala.net>
date Fri, 25 Nov 2011 17:19:34 -0500
parents 5f72a66402f7
children
line wrap: on
line source
fun main () =
  a <- source "some text";
  return <xml><body>
    <label>A: <ctextbox source={a}/></label>
  </body></xml>