Mercurial > urweb

annotate tests/bindpat.ur @ 2172:3b4a5604ed97

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Beautify '-h' output for web servers
author Adam Chlipala <adam@chlipala.net>
date Thu, 20 Aug 2015 15:11:40 -0400
parents 799be3911ce3
children
rev   line source
adam@2009 1 fun main () : transaction page =
adam@2009 2 (a, b) <- return (1, 2);
adam@2009 3 {C = c, ...} <- return {C = "hi", D = False};
adam@2009 4 d <- return 2.34;
adam@2009 5 {1 = e, 2 = f} <- return (8, 9);
adam@2009 6 return <xml>{[a]}, {[b]}, {[c]}, {[d]}, {[e]}, {[f]}</xml>