[Pkg-haskell-commits] [SCM] haskell-testpack branch, master, updated. debian/1.0.2-1-4-gb0d6b36

[John Goerzen]

The following commit has been merged in the master branch:
commit b61ccc7421f4ad17899d997ff0fb1fc705f84194
Author: John Goerzen <jgoerzen at complete.org>
Date:   Tue Dec 21 22:31:16 2004 +0100

    Checkpointing
    
    Keywords:
    
    
    (jgoerzen at complete.org--projects/missingh--head--0.7--patch-122)

diff --git a/ChangeLog b/ChangeLog
index de2f342..cc297a8 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -2,6 +2,21 @@
 # arch-tag: automatic-ChangeLog--jgoerzen at complete.org--projects/missingh--head--0.7
 #
 
+2004-12-21 15:31:16 GMT	John Goerzen <jgoerzen at complete.org>	patch-122
+
+    Summary:
+      Checkpointing
+    Revision:
+      missingh--head--0.7--patch-122
+
+
+    new files:
+     libsrc/MissingH/Network/FTP/Server.hs
+
+    modified files:
+     ChangeLog
+
+
 2004-12-21 15:28:34 GMT	John Goerzen <jgoerzen at complete.org>	patch-121
 
     Summary:
diff --git a/libsrc/MissingH/Threads.hs b/libsrc/MissingH/Network/FTP/Server.hs
similarity index 59%
copy from libsrc/MissingH/Threads.hs
copy to libsrc/MissingH/Network/FTP/Server.hs
index a863960..8802f47 100644
--- a/libsrc/MissingH/Threads.hs
+++ b/libsrc/MissingH/Network/FTP/Server.hs
@@ -1,4 +1,4 @@
-{- arch-tag: Thread utilities main file
+{- arch-tag: FTP server support
 Copyright (C) 2004 John Goerzen <jgoerzen at complete.org>
 
 This program is free software; you can redistribute it and/or modify
@@ -17,30 +17,31 @@ Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 -}
 
 {- |
-   Module     : MissingH.Threads
+   Module     : MissingH.Network.FTP.Server
    Copyright  : Copyright (C) 2004 John Goerzen
    License    : GNU GPL, version 2 or above
 
    Maintainer : John Goerzen, 
    Maintainer : jgoerzen at complete.org
-   Stability  : provisional
-   Portability: portable
+   Stability  : experimental
+   Portability: systems with networking
 
-This module provides various helpful utilities for dealing with threads.
+This module provides a server-side interface to the File Transfer Protocol
+as defined by RFC959 and RFC1123.
 
 Written by John Goerzen, jgoerzen\@complete.org
+
 -}
 
-module MissingH.Threads(-- * I\/O utilities
-                        runInThread
-                       )
+module MissingH.Network.FTP.Server(
+                                  )
 where
+import MissingH.Network.FTP.Parser
+import Network.BSD
+import Network.Socket
+import qualified Network
+import System.IO
+import MissingH.Logging.Logger
+import MissingH.Network
+import MissingH.Str
 
-import Control.Concurrent
-
-{- | Takes a IO action and a function.  The IO action will be called in a 
-separate thread.  When it is completed, the specified function is called with
-its result.  This is a simple way of doing callbacks. -}
-
-runInThread :: IO a -> (a -> IO b) -> IO ThreadId
-runInThread action callback = forkIO $ action >>= callback >> return ()

-- 
haskell-testpack