2015-10-14 18:09:10 +02:00
|
|
|
{-# LANGUAGE PackageImports #-}
|
|
|
|
{-# LANGUAGE CPP #-}
|
|
|
|
|
2015-11-09 20:15:11 +01:00
|
|
|
-- This custom Prelude emulates the API of the prelude
|
|
|
|
-- with base 4.8.
|
|
|
|
|
2015-10-14 18:09:10 +02:00
|
|
|
module Prelude
|
|
|
|
(
|
|
|
|
module P
|
|
|
|
#if MIN_VERSION_base(4,8,0)
|
|
|
|
#else
|
2015-11-09 20:15:11 +01:00
|
|
|
, Monoid(..)
|
|
|
|
, Applicative(..)
|
2015-10-14 18:09:10 +02:00
|
|
|
, (<$>)
|
|
|
|
, (<$)
|
|
|
|
#endif
|
|
|
|
)
|
|
|
|
where
|
|
|
|
|
|
|
|
#if MIN_VERSION_base(4,8,0)
|
|
|
|
import "base" Prelude as P
|
|
|
|
#elif MIN_VERSION_base(4,6,0)
|
|
|
|
import "base" Prelude as P
|
|
|
|
import Control.Applicative
|
|
|
|
import Data.Monoid
|
|
|
|
#else
|
|
|
|
import "base" Prelude as P hiding (catch)
|
|
|
|
import Control.Applicative
|
|
|
|
import Data.Monoid
|
|
|
|
#endif
|