Mercurial > urweb
view tests/rpcDO.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 | 9da62680adc5 |
children |
line wrap: on
line source
datatype list t = Nil | Cons of t * list t table t : {A : int} fun main () : transaction page = let fun rows () = query (SELECT * FROM t) (fn r ls => return (Cons (r.T.A, ls))) Nil fun show ls = case ls of Nil => <xml/> | Cons (x, ls') => <xml>{[x]}<br/>{show ls'}</xml> in s <- source Nil; return <xml><body> <button value="Get It On!" onclick={ls <- rows (); set s ls}/><br/> <br/> Current: <dyn signal={ls <- signal s; return (show ls)}/> </body></xml> end