adam@1602: table t : { A : option int }
adam@1602: 
adam@1602: fun main () : transaction page =
adam@1602:     queryX (SELECT COALESCE(t.A, 13)
adam@1602:             FROM t)
adam@1602:     (fn r => <xml>{[r.1]},</xml>)