view tests/both.ur @ 1107:52571ca9b777

Eta-expand bodies of transaction functions in Monoization, to enable later optimization
author Adam Chlipala <adamc@hcoop.net>
date Thu, 31 Dec 2009 18:07:53 -0500
parents a5eb8f87bc17
children
line wrap: on
line source
fun main () : transaction page = return <xml>
 <body>
   <form>
     <textbox{#Text}/><submit action={submit}/>
   </form>
 </body>
</xml>

and submit r = return <xml/>