3 files changed, 12 insertions, 0 deletions
diff --git a/tests/dcol.ur b/tests/dcol.ur
new file mode 100644
index 00000000..b52cf3e4
--- /dev/null
+++ b/tests/dcol.ur
@@ -0,0 +1,8 @@
+fun main () =
+  s <- source <xml><td>A</td><td>A'</td></xml>;
+  return <xml><body>
+    <button value="Click me!" onclick={set s <xml><td>B</td><td>B'</td></xml>}/><br/>
+    <table><tr><td>Pre</td><td>Pre'</td></tr>
+      <tr><td>Hehe</td><dyn signal={signal s}/><td>Hoho</td></tr>
+      <tr><td>Post</td><td>Post</td><td>Post'</td></tr></table>
+  </body></xml>
diff --git a/tests/dcol.urp b/tests/dcol.urp
new file mode 100644
index 00000000..1337c668
--- /dev/null
+++ b/tests/dcol.urp
@@ -0,0 +1,3 @@
+debug
+
+dcol
diff --git a/tests/dcol.urs b/tests/dcol.urs
new file mode 100644
index 00000000..6ac44e0b
--- /dev/null
+++ b/tests/dcol.urs
@@ -0,0 +1 @@
+val main : unit -> transaction page