annotate tests/sbind.ur @ 584:101eb0058136

Used an option as a source
author Adam Chlipala <adamc@hcoop.net>
date Thu, 01 Jan 2009 10:49:42 -0500
parents 57018f21cd5c
children
rev   line source
adamc@572 1 fun main () : transaction page = return <xml><body>
adamc@572 2 <p>Before</p>
adamc@572 3 <p><dyn signal={s <- return "Bye"; return <xml>{[s]}</xml>}/></p>
adamc@572 4 <p>After</p>
adamc@572 5 </body></xml>