diff lib/ur/basis.urs @ 1195:aff5e661b5f8

Make SELECT FROM clauses optional
author Adam Chlipala <adamc@hcoop.net>
date Sun, 28 Mar 2010 10:10:35 -0400
parents 9c82548c97e9
children c316ca3c9ec6
line wrap: on
line diff
--- a/lib/ur/basis.urs	Thu Mar 25 16:41:51 2010 -0400
+++ b/lib/ur/basis.urs	Sun Mar 28 10:10:35 2010 -0400
@@ -292,6 +292,7 @@
 
 con sql_from_items :: {{Type}} -> {{Type}} -> Type
 
+val sql_from_nil : free ::: {{Type}} -> sql_from_items free []
 val sql_from_table : free ::: {{Type}} -> t ::: Type -> fs ::: {Type}
                      -> fieldsOf t fs -> name :: Name
                      -> t -> sql_from_items free [name = fs]