Mercurial > urweb
annotate tests/view.ur @ 1866:9fc086e3c95a
Add hex SQL syntax for blobs, such as X'0ABC12343'. Works with sqlite.
author | Sergey Mironov <grrwlf@gmail.com> |
---|---|
date | Fri, 13 Sep 2013 10:09:15 -0400 |
parents | 8688e01ae469 |
children |
rev | line source |
---|---|
adamc@754 | 1 table t : { A : int, B : string } |
adamc@754 | 2 |
adamc@754 | 3 view v = SELECT t.A AS X FROM t |
adamc@754 | 4 |
adamc@754 | 5 fun main () = |
adamc@754 | 6 rows <- queryX (SELECT * FROM v) |
adamc@754 | 7 (fn r => <xml><li>{[r.V.X]}</li></xml>); |
adamc@754 | 8 return <xml><body> |
adamc@754 | 9 {rows} |
adamc@754 | 10 </body></xml> |