Fix build errors with GHC 7.10.1. Fixes #2080

This commit is contained in:
Jan Stolarek 2015-03-31 15:15:56 +02:00
parent 5c8c1d316c
commit 0f86748e50
7 changed files with 14 additions and 4 deletions

View File

@ -817,10 +817,10 @@ Library
, containers >= 0.5 && < 0.6
, deepseq < 1.5
, directory >= 1.2 && < 1.3
, filepath < 1.4
, filepath < 1.5
, fingertree >= 0.1 && < 0.2
, haskeline >= 0.7 && < 0.8
, lens >= 4.1.1 && < 4.8
, lens >= 4.1.1 && < 4.9
, mtl >= 2.1 && < 2.3
, network < 2.7
, optparse-applicative >= 0.11 && < 0.12

View File

@ -18,6 +18,8 @@ import Idris.Colours
import System.Console.Haskeline
import System.IO
import Prelude hiding ((<$>))
import Control.Applicative ((<|>))
import Control.Monad.Trans.State.Strict

View File

@ -13,6 +13,8 @@ import Idris.Core.Evaluate
import Idris.Docstrings (overview, renderDocstring, renderDocTerm)
import Idris.ErrReverse
import Prelude hiding ((<$>))
import Data.List (intersperse, nub)
import qualified Data.Text as T
import Control.Monad.State

View File

@ -11,6 +11,8 @@ import Idris.Docstrings (Docstring, emptyDocstring, noDocs, nullDocstring, rende
import Util.Pretty
import Prelude hiding ((<$>))
import Control.Arrow (first)
import Data.Maybe

View File

@ -15,6 +15,8 @@ import Util.Pretty
import Idris.Core.TT (OutputAnnotation(..), TextFormatting(..), Name, Term, Err)
import Prelude hiding ((<$>))
import qualified Data.Text as T
import qualified Data.Foldable as F
import Data.Foldable (Foldable)

View File

@ -15,10 +15,12 @@ import Util.ScreenSize (getScreenWidth)
import Control.Monad.Trans.Except (ExceptT (ExceptT), runExceptT)
import System.Console.Haskeline.MonadException
import System.Console.Haskeline.MonadException
(MonadException (controlIO), RunIO (RunIO))
import System.IO (stdout, Handle, hPutStrLn)
import Prelude hiding ((<$>))
import Data.Char (isAlpha)
import Data.List (nub, intersperse)
import Data.Maybe (fromMaybe)

View File

@ -59,7 +59,7 @@ import IRTS.System
import Control.Category
import qualified Control.Exception as X
import Prelude hiding ((.), id)
import Prelude hiding ((<$>), (.), id)
import Data.List.Split (splitOn)
import Data.List (groupBy)
import qualified Data.Text as T