X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=Control%2FConcurrent%2FMVar.hs;h=352d01ec138dfcefc6d50548273475680218245f;hb=167f2174f717dc3698c9e66928860cd8e6fb822b;hp=521b4996bbea22923ec48b7b20c4e2c02127c71e;hpb=ca4fc090b0ad583d07017a69430227ce32684ac0;p=ghc-base.git

diff --git a/Control/Concurrent/MVar.hs b/Control/Concurrent/MVar.hs
index 521b499..352d01e 100644
--- a/Control/Concurrent/MVar.hs
+++ b/Control/Concurrent/MVar.hs
@@ -1,3 +1,4 @@
+{-# OPTIONS_GHC -XNoImplicitPrelude #-}
 -----------------------------------------------------------------------------
 -- |
 -- Module      :  Control.Concurrent.MVar
@@ -45,7 +46,12 @@ import GHC.MVar ( MVar, newEmptyMVar, newMVar, takeMVar, putMVar,
                 )
 #endif
 
+#ifdef __GLASGOW_HASKELL__
+import GHC.Base
+#else
 import Prelude
+#endif
+
 import Control.Exception.Base
 
 {-|