From 9f419ec6939626011308a380a39d3a7f8a403554 Mon Sep 17 00:00:00 2001
From: Adam Chlipala <adam@chlipala.net>
Date: Sat, 19 Nov 2011 10:43:57 -0500
Subject: COALESCE

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

(limited to 'tests/coalesce.ur')

diff --git a/tests/coalesce.ur b/tests/coalesce.ur
new file mode 100644
index 00000000..5ee8cf19
--- /dev/null
+++ b/tests/coalesce.ur
@@ -0,0 +1,6 @@
+table t : { A : option int }
+
+fun main () : transaction page =
+    queryX (SELECT COALESCE(t.A, 13)
+            FROM t)
+    (fn r => <xml>{[r.1]},</xml>)
-- 
cgit v1.2.3