diff options
Diffstat (limited to 'tests/lower.ur')
-rw-r--r-- | tests/lower.ur | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/tests/lower.ur b/tests/lower.ur new file mode 100644 index 0000000..21e1f1f --- /dev/null +++ b/tests/lower.ur @@ -0,0 +1,10 @@ +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> |