Commit 12dc4c5b authored by Andrey Mokhov's avatar Andrey Mokhov

Re-export Expression from Predicates

parent e982476c
......@@ -19,6 +19,7 @@ module Expression (
getInput, getOutput,
-- * Re-exports
module Control.Monad.Trans.Reader,
module Data.Monoid,
module Builder,
module Package,
......
{-# LANGUAGE LambdaCase, FlexibleInstances #-}
-- | Convenient predicates
module Predicates (
module Expression,
stage, stage0, stage1, stage2, notStage0,
package, notPackage, builder, input, output, way
) where
......
module Settings.Builders.Alex (alexBuilderArgs) where
import Expression
import Predicates
alexBuilderArgs :: Args
......
module Settings.Builders.Ar (arBuilderArgs, arCmd, chunksOfSize) where
import Base
import Expression
import Oracles.Config.Flag
import Oracles.Config.Setting
import Predicates
......
module Settings.Builders.Cc (ccBuilderArgs) where
import Base
import Expression
import Oracles.Config.Setting
import Oracles.PackageData
import Predicates
......
module Settings.Builders.Configure (configureBuilderArgs) where
import Base
import Expression
import Oracles.Config.Setting
import Predicates
import Settings
......
module Settings.Builders.DeriveConstants (deriveConstantsBuilderArgs) where
import Base
import Expression
import Oracles.Config.Flag
import Oracles.Config.Setting
import Predicates
......
module Settings.Builders.GenApply (genApplyBuilderArgs) where
import Expression
import Predicates
-- Stdin/stdout are handled in a special way. See Rules/Actions.hs.
-- TODO: Dead code? ifeq "$(GhcUnregisterised)" "YES" GENAPPLY_OPTS = -u
......
module Settings.Builders.GenPrimopCode (genPrimopCodeBuilderArgs) where
import Expression
import Predicates
-- Stdin/stdout are handled in a special way. See Rules/Actions.hs.
......
module Settings.Builders.Ghc (ghcBuilderArgs, ghcMBuilderArgs, commonGhcArgs) where
import Control.Monad.Trans.Reader
import Base
import Expression
import GHC
import Oracles.Config.Flag
import Oracles.Config.Setting
......
......@@ -6,7 +6,6 @@ module Settings.Builders.GhcCabal (
import Base
import Builder
import Expression
import GHC
import Oracles.Config.Flag
import Oracles.Config.Setting
......
......@@ -2,7 +2,6 @@ module Settings.Builders.GhcPkg (ghcPkgBuilderArgs) where
import Base
import Builder
import Expression
import Predicates
import Settings
import Settings.Builders.GhcCabal
......
......@@ -2,9 +2,8 @@ module Settings.Builders.Haddock (haddockBuilderArgs) where
import Base
import GHC
import Package
import Expression
import Oracles.PackageData
import Package
import Predicates
import Settings
import Settings.Builders.Ghc
......
module Settings.Builders.Happy (happyBuilderArgs) where
import Expression
import Predicates
happyBuilderArgs :: Args
......
module Settings.Builders.HsCpp (hsCppBuilderArgs) where
import Expression
import GHC
import Oracles.Config.Setting
import Predicates
......
module Settings.Builders.Hsc2Hs (hsc2hsBuilderArgs) where
import Control.Monad.Extra
import Control.Monad.Trans.Class
import Base
import Expression
import Oracles.Config.Flag
import Oracles.Config.Setting
import Oracles.PackageData
......
module Settings.Builders.Ld (ldBuilderArgs) where
import Expression
import Oracles.Config.Setting
import Predicates (builder)
import Predicates
ldBuilderArgs :: Args
ldBuilderArgs = builder Ld ? do
......
module Settings.Builders.Make (makeBuilderArgs) where
import Expression
import Predicates
import Settings
......
module Settings.Builders.Tar (tarBuilderArgs) where
import Base
import Expression
import Predicates
tarBuilderArgs :: Args
......
module Settings.Default (defaultSplitObjects) where
import Base
import Expression
import GHC
import Oracles.Config.Flag
import Predicates (notStage0)
import Predicates
defaultSplitObjects :: Predicate
defaultSplitObjects = do
......
module Settings.Flavours.Quick (quickFlavourArgs, quickFlavourWays) where
import Expression
import Predicates
quickFlavourArgs :: Args
......
module Settings.Packages (getPackages, knownPackages, findKnownPackage) where
import Base
import Expression
import GHC
import Predicates
import Oracles.Config.Setting
......
module Settings.Packages.Base (basePackageArgs) where
import Base
import Expression
import GHC
import Predicates
import Settings
......
module Settings.Packages.Compiler (compilerPackageArgs) where
import Base
import Expression
import GHC
import Oracles.Config.Flag
import Oracles.Config.Setting
......
module Settings.Packages.Directory (directoryPackageArgs) where
import Expression
import GHC
import Predicates
......
module Settings.Packages.Ghc (ghcPackageArgs) where
import Expression
import GHC
import Oracles.Config.Setting
import Predicates
......
module Settings.Packages.GhcCabal (ghcCabalPackageArgs) where
import Base
import Expression
import GHC
import Oracles.Config.Setting
import Predicates
......
module Settings.Packages.GhcPrim (ghcPrimPackageArgs) where
import Expression
import GHC
import Predicates
......
module Settings.Packages.Haddock (haddockPackageArgs) where
import Expression
import GHC
import Predicates
......
module Settings.Packages.Hp2ps (hp2psPackageArgs) where
import Base
import Expression
import GHC
import Predicates
import Settings
......
module Settings.Packages.IntegerGmp (integerGmpPackageArgs, gmpBuildPath) where
import Base
import Expression
import GHC
import Oracles.Config.Setting
import Predicates
......
module Settings.Packages.IservBin (iservBinPackageArgs) where
import Expression
import GHC
import Predicates
......
......@@ -3,7 +3,6 @@ module Settings.Packages.Rts (
) where
import Base
import Expression
import GHC
import Oracles.Config.Flag
import Oracles.Config.Setting
......
module Settings.Packages.RunGhc (runGhcPackageArgs) where
import Expression
import GHC
import Oracles.Config.Setting
import Predicates
......
module Settings.Packages.Touchy (touchyPackageArgs) where
import Base
import Expression
import GHC
import Predicates
import Settings
......
module Settings.Packages.Unlit (unlitPackageArgs) where
import Base
import Expression
import GHC
import Predicates
import Settings
......
......@@ -8,7 +8,6 @@ module Settings.User (
import Base
import CmdLineFlag
import GHC
import Expression
import Predicates
import Settings.Default
......
......@@ -2,7 +2,6 @@ module Settings.Ways (getLibraryWays, getRtsWays) where
import Base
import CmdLineFlag
import Expression
import Oracles.Config.Flag
import Predicates
import Settings.Flavours.Quick
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment