3 files changed, 12 insertions, 0 deletions
diff --git a/tests/ctextarea.ur b/tests/ctextarea.ur
new file mode 100644
index 00000000..86a8c739
--- /dev/null
+++ b/tests/ctextarea.ur
@@ -0,0 +1,8 @@
+fun main () =
+    s <- source "DEFAULT";
+    return <xml><body>
+      <ctextarea rows={2} source={s}/><br/>
+      <br/>
+
+      <dyn signal={s <- signal s; return (cdata s)}/>
+    </body></xml>
diff --git a/tests/ctextarea.urp b/tests/ctextarea.urp
new file mode 100644
index 00000000..2ed9b69f
--- /dev/null
+++ b/tests/ctextarea.urp
@@ -0,0 +1,3 @@
+debug
+
+ctextarea
diff --git a/tests/ctextarea.urs b/tests/ctextarea.urs
new file mode 100644
index 00000000..6ac44e0b
--- /dev/null
+++ b/tests/ctextarea.urs
@@ -0,0 +1 @@
+val main : unit -> transaction page