Mercurial > urweb
view demo/ref.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 | 5819fb63c93a |
children |
line wrap: on
line source
structure IR = RefFun.Make(struct type data = int end) structure SR = RefFun.Make(struct type data = string end) fun mutate () = ir <- IR.new 3; ir' <- IR.new 7; sr <- SR.new "hi"; IR.write ir' 10; iv <- IR.read ir; iv' <- IR.read ir'; sv <- SR.read sr; IR.delete ir; IR.delete ir'; SR.delete sr; return <xml><body> {[iv]}, {[iv']}, {[sv]} </body></xml> fun main () = return <xml><body> <form><submit action={mutate} value="Do some pointless stuff"/></form> </body></xml>