summaryrefslogtreecommitdiff
path: root/demo/counter.ur
blob: b11fc9367e596f3c14eb9e7969d3dcb3bc6874ad (plain)
1
2
3
4
5
6
7
fun counter n = return <xml><body>
  Current counter: {[n]}<br/>
  <a link={counter (n + 1)}>Increment</a><br/>
  <a link={counter (n - 1)}>Decrement</a>
</body></xml>

fun main () = counter 0