From a167f651f6a12eab4772ab3cb16b63633e8c77ae Mon Sep 17 00:00:00 2001
From: Adam Chlipala <adam@chlipala.net>
Date: Sat, 20 Sep 2014 13:55:25 -0400
Subject: Default to parsing time strings with the application-configured
 format

---
 tests/timeRoundTrip.ur | 3 +++
 1 file changed, 3 insertions(+)
 create mode 100644 tests/timeRoundTrip.ur

(limited to 'tests/timeRoundTrip.ur')

diff --git a/tests/timeRoundTrip.ur b/tests/timeRoundTrip.ur
new file mode 100644
index 00000000..d20e61e8
--- /dev/null
+++ b/tests/timeRoundTrip.ur
@@ -0,0 +1,3 @@
+fun main () : transaction page =
+    t <- now;
+    return <xml>{[readError (show t) : time]}</xml>
-- 
cgit v1.2.3