Mercurial > urweb
view tests/rpchan.ur @ 2174:ce312cad5ecd
Use correct OpenSSL thread safety macros on OS X (closes #209)
Create an Autoconf test to determine if pthread_t is a pointer or scalar
type, and use the appropriate CRYPTO_THREADID_set macro based on the
result.
author | Benjamin Barenblat <bbaren at mit.edu> |
---|---|
date | Sun, 20 Sep 2015 17:46:07 -0400 |
parents | 3dd041b00087 |
children |
line wrap: on
line source
fun remote () = ch <- channel; send ch "Hello World!"; return ch fun remoter () = ch <- channel; send ch "Hello World!"; return <xml><active code={spawn (s <- recv ch; alert s); return <xml/>}/></xml> fun main () = x <- source <xml/>; return <xml><body> <button onclick={fn _ => ch <- rpc (remote ()); s <- recv ch; alert s}>TEST</button> <button onclick={fn _ => y <- rpc (remoter ()); set x y}>TESTER</button> <hr/> <dyn signal={signal x}/> </body></xml>