diff options
author | Adam Chlipala <adamc@hcoop.net> | 2009-04-04 11:46:24 -0400 |
---|---|---|
committer | Adam Chlipala <adamc@hcoop.net> | 2009-04-04 11:46:24 -0400 |
commit | e74f91d28381be3758a53da75985afa05a06680d (patch) | |
tree | 3979ccacac613495cad0e9aa5a76e8d8fba76b7b /tests | |
parent | 15c42e18c0a495205e6fe1dba35334b9b2914b71 (diff) |
Checking spans in dyns
Diffstat (limited to 'tests')
-rw-r--r-- | tests/dynSpan.ur | 8 | ||||
-rw-r--r-- | tests/dynSpan.urp | 3 |
2 files changed, 11 insertions, 0 deletions
diff --git a/tests/dynSpan.ur b/tests/dynSpan.ur new file mode 100644 index 00000000..123adde2 --- /dev/null +++ b/tests/dynSpan.ur @@ -0,0 +1,8 @@ +val x = 1 + +fun main () : transaction page = + s <- source "!"; + return <xml><body> + <dyn signal={x <- signal s; return <xml><span>{[x]}</span></xml>}/> + <button onclick={x <- get s; set s (x ^ "!")}/> + </body></xml> diff --git a/tests/dynSpan.urp b/tests/dynSpan.urp new file mode 100644 index 00000000..611dc313 --- /dev/null +++ b/tests/dynSpan.urp @@ -0,0 +1,3 @@ +debug + +dynSpan |