Mercurial > urweb
view tests/pathmap.ur @ 795:b87e71e45536
Testing custom paths
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Thu, 14 May 2009 08:15:36 -0400 |
parents | dc3fc3f3b834 |
children | 6271f0e3c272 |
line wrap: on
line source
val x = List.rev (List.Cons (1, List.Cons (0, List.Nil))) val y = List.mp (plus 2) x fun main () : transaction page = return <xml><body> {[x]}<br/> {[y]}<br/> {[Aux.hello]} </body></xml>