diff options
author | Austin Seipp <austin@well-typed.com> | 2014-01-13 19:15:51 -0600 |
---|---|---|
committer | Austin Seipp <austin@well-typed.com> | 2014-01-14 03:46:08 -0600 |
commit | 4571b4026248f5b1dc94a46d08b7f88164a5dce2 (patch) | |
tree | 6b9cdd19022fd71ec603ad5ed25b75882c4f91b8 /compiler/specialise | |
parent | 0537cb7e35995cbfb7de2da4b742816328bb71ab (diff) | |
download | haskell-4571b4026248f5b1dc94a46d08b7f88164a5dce2.tar.gz |
Fix ./validate failure due to -Werror
This occurs when doing bootstraps with the 7.7 compiler.
Signed-off-by: Austin Seipp <austin@well-typed.com>
Diffstat (limited to 'compiler/specialise')
-rw-r--r-- | compiler/specialise/SpecConstr.lhs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/specialise/SpecConstr.lhs b/compiler/specialise/SpecConstr.lhs index 056044ae47..6332c6b5d2 100644 --- a/compiler/specialise/SpecConstr.lhs +++ b/compiler/specialise/SpecConstr.lhs @@ -31,7 +31,7 @@ import DataCon import Coercion hiding( substTy, substCo ) import Rules import Type hiding ( substTy ) -import TyCon ( isRecursiveTyCon ) +import TyCon ( isRecursiveTyCon, tyConName ) import Id import MkCore ( mkImpossibleExpr ) import Var @@ -53,11 +53,11 @@ import UniqFM import MonadUtils import Control.Monad ( zipWithM ) import Data.List -import TyCon ( TyCon, tyConName ) import PrelNames ( specTyConName ) -- See Note [Forcing specialisation] #ifndef GHCI +import TyCon ( TyCon ) type SpecConstrAnnotation = () #else import GHC.Exts( SpecConstrAnnotation(..) ) |