--- a/tests/join.ur	Tue Apr 28 10:11:56 2009 -0400
+++ b/tests/join.ur	Tue Apr 28 11:05:28 2009 -0400
@@ -1,8 +1,9 @@
-table t : { A : int }
+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);
     return <xml/>