X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;ds=sidebyside;f=compiler%2Fspecialise%2FSpecConstr.lhs;h=bd70e284ed34bedae07d05865125762697add821;hb=ca8d50e001ffa64cefac0231f1cdbdff19b47e8c;hp=3a4b38291081acd41bb148564d7b5a74debb31ab;hpb=9414bda057e8ac8422ca5590c8500c7cdee323bb;p=ghc-hetmet.git diff --git a/compiler/specialise/SpecConstr.lhs b/compiler/specialise/SpecConstr.lhs index 3a4b382..bd70e28 100644 --- a/compiler/specialise/SpecConstr.lhs +++ b/compiler/specialise/SpecConstr.lhs @@ -32,20 +32,19 @@ import Var import VarEnv import VarSet import Name -import OccName ( mkSpecOcc ) import DynFlags ( DynFlags(..) ) import StaticFlags ( opt_PprStyle_Debug ) import StaticFlags ( opt_SpecInlineJoinPoints ) import BasicTypes ( Activation(..) ) import Maybes ( orElse, catMaybes, isJust, isNothing ) import Util -import List ( nubBy, partition ) import UniqSupply import Outputable import FastString import UniqFM import MonadUtils import Control.Monad ( zipWithM ) +import Data.List \end{code} -----------------------------------------------------