Mercurial > urweb
view tests/subquery.ur @ 1275:74150edf1134
Undo fancy wildification; instead, client code should include extra wildcard con declarations
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Thu, 03 Jun 2010 14:44:08 -0400 |
parents | 9c82548c97e9 |
children |
line wrap: on
line source
table t : { A : int, B : int, C : int } fun main () = v <- queryX1 (SELECT t.A, t.C FROM t 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>); 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>