comparison tests/reactive4.ur @ 580:bb8463c3b712
Propagating a change through a bind
| author |
Adam Chlipala <adamc@hcoop.net> |
| date |
Tue, 30 Dec 2008 16:08:25 -0500 |
| parents |
|
| children |
|
comparison
equal
deleted
inserted
replaced
| |
1 fun main () : transaction page = |
| |
2 x <- source <xml>TEST</xml>; |
| |
3 return <xml><body> |
| |
4 <dyn signal={y <- signal x; return <xml>!{y}?</xml>}/> |
| |
5 <br/> |
| |
6 <a onclick={set x <xml>CHANGEUP</xml>}>Oh My</a> |
| |
7 </body></xml> |
