Mercurial > urweb
view tests/lower.ur @ 2175:3ffef52d549c
Make urweb-mode inherit from prog-mode (contributed by Ziv Scully)
author | Adam Chlipala <adam@chlipala.net> |
---|---|
date | Thu, 15 Oct 2015 07:52:37 -0400 |
parents | 2b312f6d4007 |
children |
line wrap: on
line source
table lower : { A : string } fun main () : transaction page = all <- queryX1 (SELECT * FROM lower WHERE lower(lower.A) LIKE '%foo') (fn r => <xml>{[r.A]}<br/></xml>); return <xml><body> {all} </body></xml>