Ur/Web: tests/join.ur annotate

RIGHT and FULL JOIN

author	Adam Chlipala <adamc@hcoop.net>
date	Tue, 28 Apr 2009 11:14:24 -0400
parents	059074c8d2fc
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/>

Mercurial > urweb