summaryrefslogtreecommitdiff
path: root/tests/sleep.ur
blob: 132479e5ea79874a9f80c91dba25226c96ac5a1e (plain)
1
2
3
4
5
6
7
fun annoyer () =
    alert "Hi!";
    sleep 5000;
    annoyer ()

fun main () : transaction page = return <xml><body onload={annoyer ()}/></xml>