You are viewing a plain text version of this content. The canonical link for it is here.

Posted to commits@thrift.apache.org by Apache Wiki <wi...@apache.org> on 2011/09/15 08:39:34 UTC

[Thrift Wiki] Trivial Update of "ThriftUsageHaskell" by newacct

Dear Wiki user,

You have subscribed to a wiki page or wiki category on "Thrift Wiki" for change notification.

The "ThriftUsageHaskell" page has been changed by newacct:
http://wiki.apache.org/thrift/ThriftUsageHaskell?action=diff&rev1=3&rev2=4

    putStrLn "Server go!"
    dat <- read_Work h1
    putStrLn "Recieved data:"
-   putStrLn $ show dat
+   print dat
    write_Work h1 testdata2
    tFlush t1
    putStrLn "Data written"
@@ -104, +104 @@

    putStrLn "Data sent, receiving."
    w <- read_Work proto
    putStrLn "Recieved:"
-   putStrLn $ show w
+   print w
    tClose h
    
  main :: IO ()
@@ -114, +114 @@

      else do
      runBasicServer () serverFunc port
      putStrLn "Server stopped"
-   return ()
  }}}
  
  == Compile your Haskell program ==