adam@1636: table lower : { A : string }
adam@1636:
adam@1636: fun main () : transaction page =
adam@1636: all <- queryX1 (SELECT *
adam@1636: FROM lower
adam@1636: WHERE lower(lower.A) LIKE '%foo')
adam@1636: (fn r => {[r.A]}
);
adam@1636: return
adam@1636: {all}
adam@1636: