summaryrefslogtreecommitdiff
path: root/tests/rpc_unit.ur
blob: befd6045b93856fd11ad03ac4a0913db79229756 (plain)
1
2
3
4
5
6
7
8
val callme = return ((), (), "A", (), ())

val main : transaction page = return <xml><body>
  <button value="CLICK ME"
          onclick={fn _ =>
                      (_, _, s, _, _) <- rpc callme;
                      alert s}/>
</body></xml>