From cd5193b7e19e7ff5e49cdeafe149fdeec8e19fb0 Mon Sep 17 00:00:00 2001 From: hallgren Date: Wed, 13 Aug 2014 22:16:18 +0000 Subject: Fix warnings in 16 modules, mostly forward compatibility warnings from GHC 7.8 --- src/compiler/GF/Compile.hs | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'src/compiler/GF/Compile.hs') diff --git a/src/compiler/GF/Compile.hs b/src/compiler/GF/Compile.hs index c7818165c..f48396488 100644 --- a/src/compiler/GF/Compile.hs +++ b/src/compiler/GF/Compile.hs @@ -5,10 +5,10 @@ import GF.Compile.ReadFiles(ModEnv,getOptionsFromFile,getAllFiles, importsOfModule) import GF.CompileOne(compileOne) -import GF.Grammar.Grammar(SourceGrammar,msrc,modules,emptySourceGrammar, - abstractOfConcrete,prependModule) +import GF.Grammar.Grammar(SourceGrammar,emptySourceGrammar, + abstractOfConcrete,prependModule)--,msrc,modules -import GF.Infra.Ident(Ident,identS,showIdent) +import GF.Infra.Ident(Ident,identS)--,showIdent import GF.Infra.Option import GF.Infra.UseIO(IOE,FullPath,liftIO,getLibraryDirectory,putIfVerb, justModuleName,extendPathEnv,putStrE,putPointE) @@ -17,7 +17,7 @@ import GF.Data.Operations(raise,(+++),err) import Control.Monad(foldM,when) import GF.System.Directory(doesFileExist,getModificationTime) import System.FilePath((),isRelative,dropFileName) -import qualified Data.Map as Map(empty,insert,lookup,elems) +import qualified Data.Map as Map(empty,insert,elems) --lookup import Data.List(nub) import Data.Time(UTCTime) import GF.Text.Pretty(render,($$),(<+>),nest) -- cgit v1.2.3