resolve all current build warnings with the supported GHC versions

If I'm lucky.
This commit is contained in:
Simon Michael 2018-05-17 20:43:55 -07:00
parent 55790008d7
commit 581d02162c
4 changed files with 3 additions and 8 deletions

View File

@ -108,15 +108,12 @@ import Data.List.NonEmpty (NonEmpty(..))
import Data.List.Split (wordsBy) import Data.List.Split (wordsBy)
import Data.Maybe import Data.Maybe
import qualified Data.Map as M import qualified Data.Map as M
#if !(MIN_VERSION_base(4,11,0))
import Data.Monoid
#endif
import Data.Text (Text) import Data.Text (Text)
import qualified Data.Text as T import qualified Data.Text as T
import Data.Time.Calendar import Data.Time.Calendar
import Data.Time.LocalTime import Data.Time.LocalTime
import System.Time (getClockTime) import System.Time (getClockTime)
import Text.Megaparsec.Compat hiding (skipManyTill) import Text.Megaparsec.Compat
import Control.Applicative.Combinators (skipManyTill) import Control.Applicative.Combinators (skipManyTill)
import Hledger.Data import Hledger.Data

View File

@ -18,10 +18,10 @@ where
import qualified Data.Set as S import qualified Data.Set as S
import Data.Text import Data.Text
import Text.Megaparsec
#if MIN_VERSION_megaparsec(6,0,0) #if MIN_VERSION_megaparsec(6,0,0)
import Text.Megaparsec hiding (skipManyTill)
import Text.Megaparsec.Char import Text.Megaparsec.Char
import Data.List.NonEmpty (fromList) import Data.List.NonEmpty (fromList)
import Data.Void (Void) import Data.Void (Void)
@ -48,6 +48,7 @@ mptext = string
#else #else
import Text.Megaparsec
import Text.Megaparsec.Prim (MonadParsec) import Text.Megaparsec.Prim (MonadParsec)
-- | A basic parse error type. -- | A basic parse error type.

View File

@ -33,7 +33,6 @@ import System.FilePath (takeFileName)
import Hledger import Hledger
import Hledger.Cli hiding (progname,prognameandversion) import Hledger.Cli hiding (progname,prognameandversion)
import Hledger.Cli.Commands.Add (add)
import Hledger.UI.UIOptions import Hledger.UI.UIOptions
import Hledger.UI.UITypes import Hledger.UI.UITypes
import Hledger.UI.UIState import Hledger.UI.UIState

View File

@ -14,10 +14,8 @@ import Data.List (sortOn, foldl')
import Data.String.Here import Data.String.Here
import qualified Data.Text as T import qualified Data.Text as T
import Hledger import Hledger
import Hledger.Data.AutoTransaction (runModifierTransaction)
import Hledger.Cli.CliOptions import Hledger.Cli.CliOptions
import Hledger.Cli.Commands.Print import Hledger.Cli.Commands.Print
--import Hledger.Cli hiding (outputflags)
import System.Console.CmdArgs.Explicit import System.Console.CmdArgs.Explicit
import Text.Printf import Text.Printf
import Text.Megaparsec import Text.Megaparsec