aboutsummaryrefslogtreecommitdiffhomepage
path: root/tests/reactive4.ur
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adamc@hcoop.net>2008-12-30 16:08:25 -0500
committerGravatar Adam Chlipala <adamc@hcoop.net>2008-12-30 16:08:25 -0500
commit7f3851104f9fdefdd09d8e9a0f600968175589e0 (patch)
tree885bf20f7b2d9dd0cbd857401b5fc833ba27c32d /tests/reactive4.ur
parentbe73a31fb83c7da398322f6e92e94a7297212b7c (diff)
Propagating a change through a bind
Diffstat (limited to 'tests/reactive4.ur')
-rw-r--r--tests/reactive4.ur7
1 files changed, 7 insertions, 0 deletions
diff --git a/tests/reactive4.ur b/tests/reactive4.ur
new file mode 100644
index 00000000..b5278a63
--- /dev/null
+++ b/tests/reactive4.ur
@@ -0,0 +1,7 @@
+fun main () : transaction page =
+ x <- source <xml>TEST</xml>;
+ return <xml><body>
+ <dyn signal={y <- signal x; return <xml>!{y}?</xml>}/>
+ <br/>
+ <a onclick={set x <xml>CHANGEUP</xml>}>Oh My</a>
+ </body></xml>