From 34816f6bb3aefacd77408c9da5a1c3e0b761270d Mon Sep 17 00:00:00 2001 From: Ross Paterson Date: Wed, 13 Aug 2008 00:02:19 +0000 Subject: [PATCH] use the Haskell 98 module Control.Exception.Base in the Concurrent modules --- Control/Concurrent.hs | 2 +- Control/Concurrent/MVar.hs | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/Control/Concurrent.hs b/Control/Concurrent.hs index a0faad0..8b90e70 100644 --- a/Control/Concurrent.hs +++ b/Control/Concurrent.hs @@ -92,7 +92,7 @@ module Control.Concurrent ( import Prelude -import Control.Exception as Exception +import Control.Exception.Base as Exception #ifdef __GLASGOW_HASKELL__ import GHC.Exception diff --git a/Control/Concurrent/MVar.hs b/Control/Concurrent/MVar.hs index d4a1a48..3513bbd 100644 --- a/Control/Concurrent/MVar.hs +++ b/Control/Concurrent/MVar.hs @@ -46,7 +46,7 @@ import GHC.Conc ( MVar, newEmptyMVar, newMVar, takeMVar, putMVar, #endif import Prelude -import Control.Exception +import Control.Exception.Base {-| This is a combination of 'takeMVar' and 'putMVar'; ie. it takes the value -- 1.7.10.4