comparison 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
comparison
equal deleted inserted replaced
1194:601a77af0477 1195:aff5e661b5f8
290 -> sql_subset big2 little2 290 -> sql_subset big2 little2
291 -> sql_subset (big1 ++ big2) (little1 ++ little2) 291 -> sql_subset (big1 ++ big2) (little1 ++ little2)
292 292
293 con sql_from_items :: {{Type}} -> {{Type}} -> Type 293 con sql_from_items :: {{Type}} -> {{Type}} -> Type
294 294
295 val sql_from_nil : free ::: {{Type}} -> sql_from_items free []
295 val sql_from_table : free ::: {{Type}} -> t ::: Type -> fs ::: {Type} 296 val sql_from_table : free ::: {{Type}} -> t ::: Type -> fs ::: {Type}
296 -> fieldsOf t fs -> name :: Name 297 -> fieldsOf t fs -> name :: Name
297 -> t -> sql_from_items free [name = fs] 298 -> t -> sql_from_items free [name = fs]
298 val sql_from_query : free ::: {{Type}} -> fs ::: {Type} -> name :: Name 299 val sql_from_query : free ::: {{Type}} -> fs ::: {Type} -> name :: Name
299 -> sql_query free [] fs 300 -> sql_query free [] fs