From 1399d287e92c4d6a76564cdb2d14e226629de60d Mon Sep 17 00:00:00 2001
From: Adam Chlipala <adamc@hcoop.net>
Date: Tue, 22 Dec 2009 12:13:23 -0500
Subject: Basis.sql_nullable and Top.queryL

---
 lib/ur/basis.urs | 5 +++++
 1 file changed, 5 insertions(+)

(limited to 'lib/ur/basis.urs')

diff --git a/lib/ur/basis.urs b/lib/ur/basis.urs
index f550ce67..87454ea5 100644
--- a/lib/ur/basis.urs
+++ b/lib/ur/basis.urs
@@ -484,6 +484,11 @@ val sql_ufunc : tables ::: {{Type}} -> agg ::: {{Type}} -> exps ::: {Type}
 val sql_octet_length : sql_ufunc blob int
 
 
+val sql_nullable : tables ::: {{Type}} -> agg ::: {{Type}} -> exps ::: {Type} -> t ::: Type
+                   -> sql_injectable_prim t
+                   -> sql_exp tables agg exps t
+                   -> sql_exp tables agg exps (option t)
+
 (*** Executing queries *)
 
 val query : tables ::: {{Type}} -> exps ::: {Type}
-- 
cgit v1.2.3