From: simonmar Date: Wed, 4 Jul 2001 11:30:52 +0000 (+0000) Subject: [project @ 2001-07-04 11:30:52 by simonmar] X-Git-Tag: nhc98-1-18-release~1219 X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=c8ec30e25e79091d115f105c610038f18b041055;p=haskell-directory.git [project @ 2001-07-04 11:30:52 by simonmar] Add Prelude imports. --- diff --git a/Control/Concurrent/QSem.hs b/Control/Concurrent/QSem.hs index 6ffba7d..2cc9f55 100644 --- a/Control/Concurrent/QSem.hs +++ b/Control/Concurrent/QSem.hs @@ -8,7 +8,7 @@ -- Stability : experimental -- Portability : non-portable -- --- $Id: QSem.hs,v 1.1 2001/06/28 14:15:02 simonmar Exp $ +-- $Id: QSem.hs,v 1.2 2001/07/04 11:30:52 simonmar Exp $ -- -- General semaphores -- @@ -21,6 +21,7 @@ module Control.Concurrent.QSem signalQSem -- :: QSem -> IO () ) where +import Prelude import Control.Concurrent.MVar -- General semaphores are also implemented readily in terms of shared diff --git a/System/Console/GetOpt.hs b/System/Console/GetOpt.hs index 36c6095..1aa1b7e 100644 --- a/System/Console/GetOpt.hs +++ b/System/Console/GetOpt.hs @@ -8,7 +8,7 @@ -- Stability : experimental -- Portability : portable -- --- $Id: GetOpt.hs,v 1.1 2001/07/04 10:48:39 simonmar Exp $ +-- $Id: GetOpt.hs,v 1.2 2001/07/04 11:30:52 simonmar Exp $ -- -- A Haskell port of GNU's getopt library -- @@ -42,6 +42,7 @@ module System.Console.GetOpt ( -- -> ([a],[String],[String]) ) where +import Prelude import Data.List ( isPrefixOf ) data ArgOrder a -- what to do with options following non-options: