Mercurial > urweb

annotate 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
rev   line source
adamc@765 1 fun effect () =
adamc@765 2 Test.print;
adamc@765 3 return <xml/>
adamc@765 4
adamc@764 5 fun main () = return <xml><body>
adamc@764 6 {[Test.out (Test.frob (Test.create "Hello ") "world!")]}
adamc@765 7 <form><submit action={effect}/></form>
adamc@764 8 </body></xml>