diff options
Diffstat (limited to 'tests/selfRpc.ur')
-rw-r--r-- | tests/selfRpc.ur | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/tests/selfRpc.ur b/tests/selfRpc.ur new file mode 100644 index 00000000..a851008d --- /dev/null +++ b/tests/selfRpc.ur @@ -0,0 +1,7 @@ +fun test () = + k <- source <xml/>; + return <xml><button onclick={r <- rpc (test ()); set k r}/></xml> + +fun main () : transaction page = + h <- test (); + return <xml><body>{h}</body></xml> |