summaryrefslogtreecommitdiff
path: root/tests
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adamc@hcoop.net>2009-08-06 11:54:28 -0400
committerGravatar Adam Chlipala <adamc@hcoop.net>2009-08-06 11:54:28 -0400
commit450fce98ec509c4f20aad498b6ceea9bbb790d15 (patch)
treed59a03ba3b733dcdec316831dc6b38adb4808118 /tests
parent1409fcbff76f7846cbcb3434ebb5c0617177cf40 (diff)
dtable example and demos both working
Diffstat (limited to 'tests')
-rw-r--r--tests/dtable.ur6
-rw-r--r--tests/dtable.urp3
-rw-r--r--tests/dtable.urs1
3 files changed, 10 insertions, 0 deletions
diff --git a/tests/dtable.ur b/tests/dtable.ur
new file mode 100644
index 00000000..3a87b7bb
--- /dev/null
+++ b/tests/dtable.ur
@@ -0,0 +1,6 @@
+fun main () =
+ s <- source <xml><tr><td>A</td><td>A'</td></tr></xml>;
+ return <xml><body>
+ <button value="Click me!" onclick={set s <xml><tr><td>B</td><td>B'</td></tr><tr><td>C</td><td>C'</td></tr></xml>}/><br/>
+ <table><tr><td>Pre</td><td>Pre'</td></tr><dyn signal={signal s}/><tr><td>Post</td><td>Post</td><td>Post'</td></tr></table>
+ </body></xml>
diff --git a/tests/dtable.urp b/tests/dtable.urp
new file mode 100644
index 00000000..9a35d287
--- /dev/null
+++ b/tests/dtable.urp
@@ -0,0 +1,3 @@
+debug
+
+dtable
diff --git a/tests/dtable.urs b/tests/dtable.urs
new file mode 100644
index 00000000..6ac44e0b
--- /dev/null
+++ b/tests/dtable.urs
@@ -0,0 +1 @@
+val main : unit -> transaction page