DSTM 0.1.1 → 0.1.2

raw patch · 4 files changed

+19/−17 lines, 4 filesPVP: major bump suggested

API removals or changes: PVP suggests a major version bump

API changes (from Hackage documentation)

Files

• Chat/ChatClient.hs +0/−2
• Chat/ChatServer.hs +2/−3
• Control/Distributed/STM/DebugBase.hs +2/−6
• DSTM.cabal +15/−6

@@ -3,8 +3,6 @@ import ChatData import Control.Concurrent import Control.Distributed.STM.DSTM-import Maybe-import System.IO  main :: IO () main = startDist $ do

@@ -4,7 +4,6 @@ import Control.Distributed.STM.DebugDSTM import Control.Distributed.STM.DSTM import Control.Exception as CE-import Maybe  main :: IO () main = startDist $ do@@ -24,10 +23,10 @@         writeTVar inCmd Nothing         case serverCmd of           Join name msgVar -> do-             proc $ putStrLn (name++" joint the chat")+             proc $ putStrLn (name++" joined the chat")              mapM_ (flip writeTVar msg.snd) dict              return ((name,msgVar):dict)-             where msg = Just (Msg name " joint")+             where msg = Just (Msg name " joined")           Msg _ _ -> do              proc $ putStrLn "Message forwarded"              mapM_ (flip writeTVar cmd.snd) dict

@@ -17,7 +17,7 @@  debug0,debug1,debug2,debug3,debug4,debug5,debug6,debug7,debug8,debug9 :: Bool debug0 = False -- name server-debug1 = True -- catch error+debug1 = False -- catch error debug2 = False -- robustness debug3 = False -- robust <- debug4 = False -- tcp connection@@ -25,11 +25,7 @@ debug6 = False -- bomberman debug7 = False -- atomic debug8 = False -- 3 phase commit-debug9 = True -- life check---- located in module EnvAddr---debugErrStrLn1 :: String -> Exception -> IO ()---debugErrStrLn1 str e = debugStrLn1 (str ++ (showError e))+debug9 = False -- life check  debugStrLn0 :: String -> IO () debugStrLn0 str = if debug0 then do

@@ -1,5 +1,5 @@ Name: DSTM-Version: 0.1.1+Version: 0.1.2 Copyright: (c) 2010, Frank Kupke License: LGPL License-File: LICENSE@@ -9,21 +9,30 @@ Stability: provisional Synopsis: A framework for using STM within distributed systems Description:-{-+{ The DSTM package consists of the DSTM library, a name server application, and three sample distributed programs using the library. DSTM is a framework enabling the use of the STM interface, known from concurrent programming, to be used for distributed Haskell applications as well. Provided are a simple Dining Philosophers, a Chat, and a soft real-time Bomberman game application.-+. Distributed communication is transparent to the application programmer. The application designer uses a very simple nameserver mechanism to set up the  system. The DSTM library includes the management of unavailable process nodes and provides the application with abstract error information thus facilitating  the implementation of robust distributed application programs.--For usage please look into the included file: DSTMManual.pdf.--}+.+For usage please look into the included file: DSTMManual.pdf, also available at+http:\/\/www.informatik.uni-kiel.de\/prog\/mitarbeiter\/frank-kupke\/.+.+Changes from last version:+.+* documentation available online+.+* fixed typos in Chat example+.+* set debug flags to no debug output+} Category: Distributed Computing Build-Type: Simple Tested-With: GHC ==6.10