Mercurial > urweb
view tests/dynSpan.ur @ 2071:739172204214
Introduce recv timeout controlled by '-T' option in http.c
This should prevent a DDoS attack where attacker and keeps the connection open
but send no data.
author | Sergey Mironov <grrwlf@gmail.com> |
---|---|
date | Tue, 02 Sep 2014 17:42:10 +0000 |
parents | cc58941da3e2 |
children |
line wrap: on
line source
val x = 1 fun main () : transaction page = s <- source "!"; return <xml><body> <dyn signal={x <- signal s; return <xml><span>{[x]}</span></xml>}/> <button onclick={x <- get s; set s (x ^ "!")}/> </body></xml>