Mercurial > urweb

view tests/selfRpc.ur @ 1839:d8c260bcc1f9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix determination of MySQL timestamp hour fields (may still be wrong once DST bit flips)
author Adam Chlipala <adam@chlipala.net>
date Thu, 13 Dec 2012 17:51:34 -0500
parents 385a1b799a74
children
line wrap: on
line source
fun test () =
    k <- source <xml/>;
    return <xml><button onclick={r <- rpc (test ()); set k r}/></xml>

fun main () : transaction page =
    h <- test ();
    return <xml><body>{h}</body></xml>