summaryrefslogtreecommitdiff
path: root/tests/user.ur
blob: c36fe407826f5a51c67e209d58444cbd0393c7e4 (plain)
1
2
3
4
5
table user : {A : int}

fun main () =
    r <- oneRow (SELECT COUNT( * ) AS N FROM user);
    return <xml>{[r.N]}</xml>