--- ChasingBottoms-1.3.0.5-orig/Test/ChasingBottoms/IsBottom.hs 2012-09-07 19:47:03.000000000 +1000 +++ ChasingBottoms-1.3.0.5/Test/ChasingBottoms/IsBottom.hs 2012-09-18 14:11:17.828116785 +1000 @@ -1,4 +1,4 @@ -{-# LANGUAGE ScopedTypeVariables #-} +{-# LANGUAGE CPP, ScopedTypeVariables #-} -- | -- Module : Test.ChasingBottoms.IsBottom @@ -17,7 +17,9 @@ , isBottomTimeOut ) where +#if !MIN_VERSION_base(4,6,0) import Prelude hiding (catch) +#endif import qualified Control.Exception as E import System.IO.Unsafe (unsafePerformIO) import qualified Test.ChasingBottoms.TimeOut as T