summaryrefslogtreecommitdiff
path: root/tests/cffi.ur
diff options
context:
space:
mode:
Diffstat (limited to 'tests/cffi.ur')
-rw-r--r--tests/cffi.ur8
1 files changed, 7 insertions, 1 deletions
diff --git a/tests/cffi.ur b/tests/cffi.ur
index cc93b8f5..039eac55 100644
--- a/tests/cffi.ur
+++ b/tests/cffi.ur
@@ -1,6 +1,12 @@
+fun printer () = Test.foo
+
fun effect () =
Test.print;
- return <xml/>
+ return <xml><body>
+ <button value="Remote" onclick={printer ()}/>
+ <button value="Local" onclick={Test.bar "Hoho"}/>
+ <button value="Either" onclick={Test.print}/>
+ </body></xml>
fun main () = return <xml><body>
{[Test.out (Test.frob (Test.create "Hello ") "world!")]}