annotate tests/join.ur @ 837:ccf22c2c77b2
Tweak -- precedence; use right env for final exhaustiveness errors
| author |
Adam Chlipala <adamc@hcoop.net> |
| date |
Tue, 02 Jun 2009 15:43:18 -0400 |
| parents |
f95d652086cd |
| children |
|
| rev |
line source |
|
adamc@750
|
1 table t : { A : int, B : string, C : option string }
|
|
adamc@748
|
2
|
|
adamc@748
|
3 fun main () =
|
|
adamc@748
|
4 r <- oneRow (SELECT * FROM t);
|
|
adamc@748
|
5 r <- oneRow (SELECT * FROM t AS T1, t AS T2);
|
|
adamc@749
|
6 r <- oneRow (SELECT * FROM t AS T1 CROSS JOIN t AS T2);
|
|
adamc@749
|
7 r <- oneRow (SELECT * FROM t AS T1 JOIN t AS T2 ON T1.A = T2.A);
|
|
adamc@750
|
8 r <- oneRow (SELECT * FROM t AS T1 LEFT JOIN t AS T2 ON T1.A = T2.A);
|
|
adamc@751
|
9 r <- oneRow (SELECT * FROM t AS T1 RIGHT OUTER JOIN t AS T2 ON T1.A = T2.A);
|
|
adamc@751
|
10 r <- oneRow (SELECT * FROM t AS T1 FULL JOIN t AS T2 ON T1.A = T2.A);
|
|
adamc@748
|
11 return <xml/>
|
