DSTM 0.1 → 0.1.1

raw patch · 3 files changed

+24/−1 lines, 3 files

Files

• Chat/ChatData.hs +17/−0
• DSTM.cabal +3/−1
• README +4/−0

@@ -0,0 +1,17 @@+module ChatData where++import Control.Distributed.STM.DSTM++type CmdTVar = TVar (Maybe ServerCmd)++data ServerCmd = Join String CmdTVar+	       | Msg String String+	       | Leave String+  deriving (Show,Read)++instance Dist ServerCmd where+  finTVars (Join _ cmd) = finTVars cmd +  finTVars _ = return ()+ +  regTVars env (Join _ cmd) = regTVars env cmd+  regTVars _ _ = return ()

@@ -1,5 +1,5 @@ Name: DSTM-Version: 0.1+Version: 0.1.1 Copyright: (c) 2010, Frank Kupke License: LGPL License-File: LICENSE@@ -70,11 +70,13 @@   Main-Is:        ChatClient.hs   Build-Depends:  base >=4 && <5, unix, process, network, haskell98, containers   Hs-Source-Dirs: Chat, .+  Other-Modules:  ChatData  Executable ChatServer   Main-Is:        ChatServer.hs   Build-Depends:  base >=4 && <5, unix, process, network, haskell98, containers   Hs-Source-Dirs: Chat, .+  Other-Modules:  ChatData  Executable Bomberman   Main-Is:        Bomberman.hs

@@ -38,6 +38,10 @@ install into `$ProgramFiles/Haskell`. If you want to install elsewhere use the `--prefix=` flag at the configure step. +User«s Manual+==============+Please see DSTMManual.pdf in the DSTM directory.+ Bugs =======