Mercurial > urweb
diff tests/subquery.ur @ 1192:9c82548c97e9
Subquery FROM items
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Thu, 25 Mar 2010 16:06:04 -0400 |
parents | 61c3139eab12 |
children |
line wrap: on
line diff
--- a/tests/subquery.ur Thu Mar 25 15:44:24 2010 -0400 +++ b/tests/subquery.ur Thu Mar 25 16:06:04 2010 -0400 @@ -6,5 +6,14 @@ WHERE t.B = (SELECT MAX(U.B) AS M FROM t AS U WHERE U.A = t.A)) - (fn r => <xml>{[r.A]},{[r.C]};</xml>); - return <xml>{v}</xml> + (fn r => <xml>{[r.A]},{[r.C]};</xml>); + v' <- queryX1 (SELECT t.A, t.C + FROM (SELECT t.A AS A, MAX(t.B) AS B + FROM t + GROUP BY t.A) AS Maxes + JOIN t ON t.A = Maxes.A AND t.B = Maxes.B) + (fn r => <xml>{[r.A]},{[r.C]};</xml>); + return <xml><body> + {v}<br/> + {v'} + </body></xml>