1 files changed, 6 insertions, 1 deletions

diff --git a/examples/Client.hs b/examples/Client.hs
index 1d925c7a..cd340a03 100644
--- a/examples/Client.hs
+++ b/examples/Client.hs
@@ -10,7 +10,12 @@ addr :: RemoteAddr
 addr = (0, 6000)
 
 main :: IO ()
-main = print =<< call addr swapM (1, 2)
+main = do
+  print =<< call addr unitM ()
+  print =<< call addr echoM 0
+  call addr reverseM [1..1000]
+  print =<< call addr swapM (0, 1)
+  print =<< call addr shiftR ((), 1, [2..10])
 
 {-
   forM_ [1..] $ const $ do