Repository : ssh://darcs.haskell.org//srv/darcs/packages/base On branch : master
http://hackage.haskell.org/trac/ghc/changeset/4553fdaf4607928ce76bfb034f6b1273127f938c >--------------------------------------------------------------- commit 4553fdaf4607928ce76bfb034f6b1273127f938c Author: Ian Lynagh <[email protected]> Date: Sat Jun 23 13:44:08 2012 +0100 Deprecate Control.Concurrent.{QSem,QSemNSampleVar} Also Control.Concurrent.{mergeIO,nmergeIO}, which use those modules. >--------------------------------------------------------------- Control/Concurrent.hs | 5 +++++ Control/Concurrent/QSem.hs | 1 + Control/Concurrent/QSemN.hs | 1 + Control/Concurrent/SampleVar.hs | 1 + 4 files changed, 8 insertions(+), 0 deletions(-) diff --git a/Control/Concurrent.hs b/Control/Concurrent.hs index 1bac565..0f3bb5d 100644 --- a/Control/Concurrent.hs +++ b/Control/Concurrent.hs @@ -6,6 +6,9 @@ , ScopedTypeVariables #-} {-# OPTIONS_GHC -fno-warn-unused-imports #-} +{-# OPTIONS_GHC -fno-warn-deprecations #-} +-- kludge for the Control.Concurrent.QSem, Control.Concurrent.QSemN +-- and Control.Concurrent.SampleVar imports. ----------------------------------------------------------------------------- -- | @@ -229,6 +232,8 @@ forkFinally action and_then = max_buff_size :: Int max_buff_size = 1 +{-# DEPRECATED mergeIO "Control.Concurrent.mergeIO will be removed in GHC 7.8. Please use an alternative, e.g. the SafeSemaphore package, instead." #-} +{-# DEPRECATED nmergeIO "Control.Concurrent.nmergeIO will be removed in GHC 7.8. Please use an alternative, e.g. the SafeSemaphore package, instead." #-} mergeIO :: [a] -> [a] -> IO [a] nmergeIO :: [[a]] -> IO [a] diff --git a/Control/Concurrent/QSem.hs b/Control/Concurrent/QSem.hs index 5ed887d..2fd2ad6 100644 --- a/Control/Concurrent/QSem.hs +++ b/Control/Concurrent/QSem.hs @@ -19,6 +19,7 @@ ----------------------------------------------------------------------------- module Control.Concurrent.QSem + {-# DEPRECATED "Control.Concurrent.QSem will be removed in GHC 7.8. Please use an alternative, e.g. the SafeSemaphore package, instead." #-} ( -- * Simple Quantity Semaphores QSem, -- abstract newQSem, -- :: Int -> IO QSem diff --git a/Control/Concurrent/QSemN.hs b/Control/Concurrent/QSemN.hs index 7e2cb2c..9126365 100644 --- a/Control/Concurrent/QSemN.hs +++ b/Control/Concurrent/QSemN.hs @@ -20,6 +20,7 @@ ----------------------------------------------------------------------------- module Control.Concurrent.QSemN + {-# DEPRECATED "Control.Concurrent.QSemN will be removed in GHC 7.8. Please use an alternative, e.g. the SafeSemaphore package, instead." #-} ( -- * General Quantity Semaphores QSemN, -- abstract newQSemN, -- :: Int -> IO QSemN diff --git a/Control/Concurrent/SampleVar.hs b/Control/Concurrent/SampleVar.hs index a621193..e3852fa 100644 --- a/Control/Concurrent/SampleVar.hs +++ b/Control/Concurrent/SampleVar.hs @@ -19,6 +19,7 @@ ----------------------------------------------------------------------------- module Control.Concurrent.SampleVar + {-# DEPRECATED "Control.Concurrent.SampleVar will be removed in GHC 7.8. Please use an alternative, e.g. the SafeSemaphore package, instead." #-} ( -- * Sample Variables SampleVar, -- :: type _ = _______________________________________________ Cvs-libraries mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-libraries
