Mercurial > urweb

comparison tests/cffi.ur @ 765:a28982de5645

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Successfully influenced effectful-ness status of FFI func
author Adam Chlipala <adamc@hcoop.net>
date Sat, 02 May 2009 11:27:26 -0400
parents 7f653298dd66
children df09c95085f8
comparison
equal deleted inserted replaced
764:7f653298dd66 765:a28982de5645
1 fun effect () =
2 Test.print;
3 return <xml/>
4
1 fun main () = return <xml><body> 5 fun main () = return <xml><body>
2 {[Test.out (Test.frob (Test.create "Hello ") "world!")]} 6 {[Test.out (Test.frob (Test.create "Hello ") "world!")]}
7 <form><submit action={effect}/></form>
3 </body></xml> 8 </body></xml>