aboutsummaryrefslogtreecommitdiffhomepage
path: root/tests/showTime.ur
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adam@chlipala.net>2011-12-04 14:40:12 -0500
committerGravatar Adam Chlipala <adam@chlipala.net>2011-12-04 14:40:12 -0500
commit226fb11ff2da90b7b68dad1b29b9688f880a06a3 (patch)
tree86de944318bf3610af01258c455ceacfd450c307 /tests/showTime.ur
parent87e2e610a69b268d10a22a7142a44a2c0afd4799 (diff)
timeFormat .urp directive
Diffstat (limited to 'tests/showTime.ur')
-rw-r--r--tests/showTime.ur8
1 files changed, 8 insertions, 0 deletions
diff --git a/tests/showTime.ur b/tests/showTime.ur
new file mode 100644
index 00000000..e439d6a6
--- /dev/null
+++ b/tests/showTime.ur
@@ -0,0 +1,8 @@
+fun main () : transaction page =
+ tm <- now;
+ s <- source tm;
+ return <xml><body>
+ <b>Server:</b> {[tm]}<br/>
+ <b>Client:</b> <dyn signal={v <- signal s; return (txt v)}/>
+ <button value="Recalculate" onclick={tm <- now; set s tm}/>
+ </body></xml>