Mercurial > urweb

view tests/view.ur @ 1473:d40066b38710

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Handle spaces in filenames passed to GCC (caught by Zachary Tatlock)
author Adam Chlipala <adam@chlipala.net>
date Wed, 15 Jun 2011 09:52:06 -0400
parents 8688e01ae469
children
line wrap: on
line source
table t : { A : int, B : string }

view v = SELECT t.A AS X FROM t

fun main () =
    rows <- queryX (SELECT * FROM v)
            (fn r => <xml><li>{[r.V.X]}</li></xml>);
    return <xml><body>
      {rows}
    </body></xml>