summaryrefslogtreecommitdiff
path: root/tests/subform.ur
diff options
context:
space:
mode:
Diffstat (limited to 'tests/subform.ur')
-rw-r--r--tests/subform.ur16
1 files changed, 16 insertions, 0 deletions
diff --git a/tests/subform.ur b/tests/subform.ur
new file mode 100644
index 0000000..2ab1f1a
--- /dev/null
+++ b/tests/subform.ur
@@ -0,0 +1,16 @@
+fun handler r = return <xml><body>
+ {[r.A]}, {[r.Sub.A]}, {[r.Sub.B]}, {[r.Sub.Sub]}, {[r.C]}
+</body></xml>
+
+fun main () = return <xml><body>
+ <form>
+ <textbox{#A}/><br/>
+ <subform{#Sub}>
+ <textbox{#A}/><br/>
+ <textbox{#B}/><br/>
+ <textbox{#Sub}/><br/>
+ </subform>
+ <textbox{#C}/><br/>
+ <submit action={handler}/>
+ </form>
+</body></xml>