view tests/join.ur @ 1380:ede95ecb4000

Thanks to Vag Vagoff, catch some cases of an obsolete notation for guarded types in the manual
author Adam Chlipala <adam@chlipala.net>
date Thu, 06 Jan 2011 08:55:53 -0500
parents f95d652086cd
children
line wrap: on
line source
table t : { A : int, B : string, C : option string }

fun main () =
    r <- oneRow (SELECT * FROM t);
    r <- oneRow (SELECT * FROM t AS T1, t AS T2);
    r <- oneRow (SELECT * FROM t AS T1 CROSS JOIN t AS T2);
    r <- oneRow (SELECT * FROM t AS T1 JOIN t AS T2 ON T1.A = T2.A);
    r <- oneRow (SELECT * FROM t AS T1 LEFT JOIN t AS T2 ON T1.A = T2.A);
    r <- oneRow (SELECT * FROM t AS T1 RIGHT OUTER JOIN t AS T2 ON T1.A = T2.A);
    r <- oneRow (SELECT * FROM t AS T1 FULL JOIN t AS T2 ON T1.A = T2.A);
    return <xml/>