diff options
Diffstat (limited to 'tests/ffieff.ur')
-rw-r--r-- | tests/ffieff.ur | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/tests/ffieff.ur b/tests/ffieff.ur new file mode 100644 index 00000000..a63fa4bc --- /dev/null +++ b/tests/ffieff.ur @@ -0,0 +1,6 @@ +open Ffi_eff + +fun main () : transaction page = return <xml><body> + <button value="shout" onclick={fn _ => shout "Hi!"; shout "Bye!"}/> + <button value="sneakyShout" onclick={fn _ => let val x = sneakyShout "Whoa" in return () end}/> +</body></xml> |