diff options
author | Adam Chlipala <adamc@hcoop.net> | 2010-03-25 16:06:04 -0400 |
---|---|---|
committer | Adam Chlipala <adamc@hcoop.net> | 2010-03-25 16:06:04 -0400 |
commit | 1cf8f27e444433cd052c0e84f6519288d182d8a7 (patch) | |
tree | 692542b44d3c974920be5c1b7b9c8a708c336dff /tests/subquery.ur | |
parent | 26eeffeaee9f015cc95430da2f5308ce585a194d (diff) |
Subquery FROM items
Diffstat (limited to 'tests/subquery.ur')
-rw-r--r-- | tests/subquery.ur | 13 |
1 files changed, 11 insertions, 2 deletions
diff --git a/tests/subquery.ur b/tests/subquery.ur index 302175e5..b7881817 100644 --- a/tests/subquery.ur +++ b/tests/subquery.ur @@ -6,5 +6,14 @@ fun main () = 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> |