summaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adamc@hcoop.net>2009-04-28 10:11:56 -0400
committerGravatar Adam Chlipala <adamc@hcoop.net>2009-04-28 10:11:56 -0400
commit37dd8d6d0f33b2a6370301f12287c8e15d17094a (patch)
treea004501c5981c841f5e58ffa7063b9f16fa6e78e /lib
parentd073725a2b58302c1a1d0faf4601df140c242307 (diff)
INNER JOIN
Diffstat (limited to 'lib')
-rw-r--r--lib/ur/basis.urs5
1 files changed, 5 insertions, 0 deletions
diff --git a/lib/ur/basis.urs b/lib/ur/basis.urs
index c6ba7b2c..a81ba30a 100644
--- a/lib/ur/basis.urs
+++ b/lib/ur/basis.urs
@@ -229,6 +229,11 @@ val sql_from_comma : tabs1 ::: {{Type}} -> tabs2 ::: {{Type}}
-> [tabs1 ~ tabs2]
=> sql_from_items tabs1 -> sql_from_items tabs2
-> sql_from_items (tabs1 ++ tabs2)
+val sql_inner_join : tabs1 ::: {{Type}} -> tabs2 ::: {{Type}}
+ -> [tabs1 ~ tabs2]
+ => sql_from_items tabs1 -> sql_from_items tabs2
+ -> sql_exp (tabs1 ++ tabs2) [] [] bool
+ -> sql_from_items (tabs1 ++ tabs2)
val sql_query1 : tables ::: {{Type}}
-> grouped ::: {{Type}}