module Distribution.Client.ProjectConfig.Lens where
import Distribution.Client.BuildReports.Types (ReportLevel (..))
import Distribution.Client.CmdInstall.ClientInstallFlags (ClientInstallFlags (..))
import Distribution.Client.Dependency.Types (PreSolver (..))
import Distribution.Client.IndexUtils.ActiveRepos
( ActiveRepos
)
import Distribution.Client.IndexUtils.IndexState (TotalIndexState)
import Distribution.Client.ProjectConfig.Types (MapLast, MapMappend, PackageConfig, ProjectConfig (..), ProjectConfigBuildOnly (..), ProjectConfigProvenance, ProjectConfigShared)
import qualified Distribution.Client.ProjectConfig.Types as T
import Distribution.Client.Targets (UserConstraint)
import Distribution.Client.Types.AllowNewer (AllowNewer, AllowOlder)
import Distribution.Client.Types.Repo (LocalRepo, RemoteRepo)
import Distribution.Client.Types.SourceRepo (SourceRepoList)
import Distribution.Client.Types.WriteGhcEnvironmentFilesPolicy (WriteGhcEnvironmentFilesPolicy)
import Distribution.Compat.Lens
import Distribution.Compat.Prelude
import Distribution.Compiler (CompilerFlavor (..))
import Distribution.Package
( PackageName
)
import Distribution.PackageDescription
( FlagAssignment
)
import Distribution.Simple.Compiler
( DebugInfoLevel (..)
, OptimisationLevel (..)
, PackageDBCWD
, ProfDetailLevel
)
import Distribution.Simple.InstallDirs
( InstallDirs
, PathTemplate
)
import Distribution.Simple.Setup
( DumpBuildInfo (..)
, Flag
, HaddockTarget (..)
, TestShowDetails (..)
)
import Distribution.Solver.Types.ConstraintSource (ConstraintSource)
import Distribution.Solver.Types.Settings
( AllowBootLibInstalls (..)
, CountConflicts (..)
, FineGrainedConflicts (..)
, IndependentGoals (..)
, MinimizeConflictSet (..)
, OnlyConstrained (..)
, PreferOldest (..)
, ReorderGoals (..)
, StrongFlags (..)
)
import Distribution.Types.PackageVersionConstraint
( PackageVersionConstraint
)
import Distribution.Types.Version (Version)
import Distribution.Utils.NubList
( NubList
)
import Distribution.Verbosity
projectPackages :: Lens' ProjectConfig [String]
projectPackages :: Lens' ProjectConfig [String]
projectPackages [String] -> f [String]
f ProjectConfig
s = ([String] -> ProjectConfig) -> f [String] -> f ProjectConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\[String]
x -> ProjectConfig
s{T.projectPackages = x}) ([String] -> f [String]
f (ProjectConfig -> [String]
T.projectPackages ProjectConfig
s))
{-# INLINEABLE projectPackages #-}
projectPackagesOptional :: Lens' ProjectConfig [String]
projectPackagesOptional :: Lens' ProjectConfig [String]
projectPackagesOptional [String] -> f [String]
f ProjectConfig
s = ([String] -> ProjectConfig) -> f [String] -> f ProjectConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\[String]
x -> ProjectConfig
s{T.projectPackagesOptional = x}) ([String] -> f [String]
f (ProjectConfig -> [String]
T.projectPackagesOptional ProjectConfig
s))
{-# INLINEABLE projectPackagesOptional #-}
projectPackagesRepo :: Lens' ProjectConfig [SourceRepoList]
projectPackagesRepo :: Lens' ProjectConfig [SourceRepoList]
projectPackagesRepo [SourceRepoList] -> f [SourceRepoList]
f ProjectConfig
s = ([SourceRepoList] -> ProjectConfig)
-> f [SourceRepoList] -> f ProjectConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\[SourceRepoList]
x -> ProjectConfig
s{T.projectPackagesRepo = x}) ([SourceRepoList] -> f [SourceRepoList]
f (ProjectConfig -> [SourceRepoList]
T.projectPackagesRepo ProjectConfig
s))
{-# INLINEABLE projectPackagesRepo #-}
projectPackagesNamed :: Lens' ProjectConfig [PackageVersionConstraint]
projectPackagesNamed :: Lens' ProjectConfig [PackageVersionConstraint]
projectPackagesNamed [PackageVersionConstraint] -> f [PackageVersionConstraint]
f ProjectConfig
s = ([PackageVersionConstraint] -> ProjectConfig)
-> f [PackageVersionConstraint] -> f ProjectConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\[PackageVersionConstraint]
x -> ProjectConfig
s{T.projectPackagesNamed = x}) ([PackageVersionConstraint] -> f [PackageVersionConstraint]
f (ProjectConfig -> [PackageVersionConstraint]
T.projectPackagesNamed ProjectConfig
s))
{-# INLINEABLE projectPackagesNamed #-}
projectConfigBuildOnly :: Lens' ProjectConfig ProjectConfigBuildOnly
projectConfigBuildOnly :: Lens' ProjectConfig ProjectConfigBuildOnly
projectConfigBuildOnly ProjectConfigBuildOnly -> f ProjectConfigBuildOnly
f ProjectConfig
s = (ProjectConfigBuildOnly -> ProjectConfig)
-> f ProjectConfigBuildOnly -> f ProjectConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\ProjectConfigBuildOnly
x -> ProjectConfig
s{T.projectConfigBuildOnly = x}) (ProjectConfigBuildOnly -> f ProjectConfigBuildOnly
f (ProjectConfig -> ProjectConfigBuildOnly
T.projectConfigBuildOnly ProjectConfig
s))
{-# INLINEABLE projectConfigBuildOnly #-}
projectConfigShared :: Lens' ProjectConfig ProjectConfigShared
projectConfigShared :: Lens' ProjectConfig ProjectConfigShared
projectConfigShared ProjectConfigShared -> f ProjectConfigShared
f ProjectConfig
s = (ProjectConfigShared -> ProjectConfig)
-> f ProjectConfigShared -> f ProjectConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\ProjectConfigShared
x -> ProjectConfig
s{T.projectConfigShared = x}) (ProjectConfigShared -> f ProjectConfigShared
f (ProjectConfig -> ProjectConfigShared
T.projectConfigShared ProjectConfig
s))
{-# INLINEABLE projectConfigShared #-}
projectConfigProvenance :: Lens' ProjectConfig (Set ProjectConfigProvenance)
projectConfigProvenance :: Lens' ProjectConfig (Set ProjectConfigProvenance)
projectConfigProvenance Set ProjectConfigProvenance -> f (Set ProjectConfigProvenance)
f ProjectConfig
s = (Set ProjectConfigProvenance -> ProjectConfig)
-> f (Set ProjectConfigProvenance) -> f ProjectConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Set ProjectConfigProvenance
x -> ProjectConfig
s{T.projectConfigProvenance = x}) (Set ProjectConfigProvenance -> f (Set ProjectConfigProvenance)
f (ProjectConfig -> Set ProjectConfigProvenance
T.projectConfigProvenance ProjectConfig
s))
{-# INLINEABLE projectConfigProvenance #-}
projectConfigAllPackages :: Lens' ProjectConfig PackageConfig
projectConfigAllPackages :: Lens' ProjectConfig PackageConfig
projectConfigAllPackages PackageConfig -> f PackageConfig
f ProjectConfig
s = (PackageConfig -> ProjectConfig)
-> f PackageConfig -> f ProjectConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\PackageConfig
x -> ProjectConfig
s{T.projectConfigAllPackages = x}) (PackageConfig -> f PackageConfig
f (ProjectConfig -> PackageConfig
T.projectConfigAllPackages ProjectConfig
s))
{-# INLINEABLE projectConfigAllPackages #-}
projectConfigLocalPackages :: Lens' ProjectConfig PackageConfig
projectConfigLocalPackages :: Lens' ProjectConfig PackageConfig
projectConfigLocalPackages PackageConfig -> f PackageConfig
f ProjectConfig
s = (PackageConfig -> ProjectConfig)
-> f PackageConfig -> f ProjectConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\PackageConfig
x -> ProjectConfig
s{T.projectConfigLocalPackages = x}) (PackageConfig -> f PackageConfig
f (ProjectConfig -> PackageConfig
T.projectConfigLocalPackages ProjectConfig
s))
{-# INLINEABLE projectConfigLocalPackages #-}
projectConfigSpecificPackage :: Lens' ProjectConfig (MapMappend PackageName PackageConfig)
projectConfigSpecificPackage :: Lens' ProjectConfig (MapMappend PackageName PackageConfig)
projectConfigSpecificPackage MapMappend PackageName PackageConfig
-> f (MapMappend PackageName PackageConfig)
f ProjectConfig
s = (MapMappend PackageName PackageConfig -> ProjectConfig)
-> f (MapMappend PackageName PackageConfig) -> f ProjectConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\MapMappend PackageName PackageConfig
x -> ProjectConfig
s{T.projectConfigSpecificPackage = x}) (MapMappend PackageName PackageConfig
-> f (MapMappend PackageName PackageConfig)
f (ProjectConfig -> MapMappend PackageName PackageConfig
T.projectConfigSpecificPackage ProjectConfig
s))
{-# INLINEABLE projectConfigSpecificPackage #-}
projectConfigVerbosity :: Lens' ProjectConfigBuildOnly (Flag VerbosityFlags)
projectConfigVerbosity :: Lens' ProjectConfigBuildOnly (Flag VerbosityFlags)
projectConfigVerbosity Flag VerbosityFlags -> f (Flag VerbosityFlags)
f ProjectConfigBuildOnly
s = (Flag VerbosityFlags -> ProjectConfigBuildOnly)
-> f (Flag VerbosityFlags) -> f ProjectConfigBuildOnly
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag VerbosityFlags
x -> ProjectConfigBuildOnly
s{T.projectConfigVerbosity = x}) (Flag VerbosityFlags -> f (Flag VerbosityFlags)
f (ProjectConfigBuildOnly -> Flag VerbosityFlags
T.projectConfigVerbosity ProjectConfigBuildOnly
s))
{-# INLINEABLE projectConfigVerbosity #-}
projectConfigSummaryFile :: Lens' ProjectConfigBuildOnly (NubList PathTemplate)
projectConfigSummaryFile :: Lens' ProjectConfigBuildOnly (NubList PathTemplate)
projectConfigSummaryFile NubList PathTemplate -> f (NubList PathTemplate)
f ProjectConfigBuildOnly
s = (NubList PathTemplate -> ProjectConfigBuildOnly)
-> f (NubList PathTemplate) -> f ProjectConfigBuildOnly
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\NubList PathTemplate
x -> ProjectConfigBuildOnly
s{T.projectConfigSummaryFile = x}) (NubList PathTemplate -> f (NubList PathTemplate)
f (ProjectConfigBuildOnly -> NubList PathTemplate
T.projectConfigSummaryFile ProjectConfigBuildOnly
s))
{-# INLINEABLE projectConfigSummaryFile #-}
projectConfigLogFile :: Lens' ProjectConfigBuildOnly (Flag PathTemplate)
projectConfigLogFile :: Lens' ProjectConfigBuildOnly (Flag PathTemplate)
projectConfigLogFile Flag PathTemplate -> f (Flag PathTemplate)
f ProjectConfigBuildOnly
s = (Flag PathTemplate -> ProjectConfigBuildOnly)
-> f (Flag PathTemplate) -> f ProjectConfigBuildOnly
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag PathTemplate
x -> ProjectConfigBuildOnly
s{T.projectConfigLogFile = x}) (Flag PathTemplate -> f (Flag PathTemplate)
f (ProjectConfigBuildOnly -> Flag PathTemplate
T.projectConfigLogFile ProjectConfigBuildOnly
s))
{-# INLINEABLE projectConfigLogFile #-}
projectConfigBuildReports :: Lens' ProjectConfigBuildOnly (Flag ReportLevel)
projectConfigBuildReports :: Lens' ProjectConfigBuildOnly (Flag ReportLevel)
projectConfigBuildReports Flag ReportLevel -> f (Flag ReportLevel)
f ProjectConfigBuildOnly
s = (Flag ReportLevel -> ProjectConfigBuildOnly)
-> f (Flag ReportLevel) -> f ProjectConfigBuildOnly
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag ReportLevel
x -> ProjectConfigBuildOnly
s{T.projectConfigBuildReports = x}) (Flag ReportLevel -> f (Flag ReportLevel)
f (ProjectConfigBuildOnly -> Flag ReportLevel
T.projectConfigBuildReports ProjectConfigBuildOnly
s))
{-# INLINEABLE projectConfigBuildReports #-}
projectConfigReportPlanningFailure :: Lens' ProjectConfigBuildOnly (Flag Bool)
projectConfigReportPlanningFailure :: Lens' ProjectConfigBuildOnly (Flag Bool)
projectConfigReportPlanningFailure Flag Bool -> f (Flag Bool)
f ProjectConfigBuildOnly
s = (Flag Bool -> ProjectConfigBuildOnly)
-> f (Flag Bool) -> f ProjectConfigBuildOnly
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag Bool
x -> ProjectConfigBuildOnly
s{T.projectConfigReportPlanningFailure = x}) (Flag Bool -> f (Flag Bool)
f (ProjectConfigBuildOnly -> Flag Bool
T.projectConfigReportPlanningFailure ProjectConfigBuildOnly
s))
{-# INLINEABLE projectConfigReportPlanningFailure #-}
projectConfigSymlinkBinDir :: Lens' ProjectConfigBuildOnly (Flag FilePath)
projectConfigSymlinkBinDir :: Lens' ProjectConfigBuildOnly (Flag String)
projectConfigSymlinkBinDir Flag String -> f (Flag String)
f ProjectConfigBuildOnly
s = (Flag String -> ProjectConfigBuildOnly)
-> f (Flag String) -> f ProjectConfigBuildOnly
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag String
x -> ProjectConfigBuildOnly
s{T.projectConfigSymlinkBinDir = x}) (Flag String -> f (Flag String)
f (ProjectConfigBuildOnly -> Flag String
T.projectConfigSymlinkBinDir ProjectConfigBuildOnly
s))
{-# INLINEABLE projectConfigSymlinkBinDir #-}
projectConfigNumJobs :: Lens' ProjectConfigBuildOnly (Flag (Maybe Int))
projectConfigNumJobs :: Lens' ProjectConfigBuildOnly (Flag (Maybe Int))
projectConfigNumJobs Flag (Maybe Int) -> f (Flag (Maybe Int))
f ProjectConfigBuildOnly
s = (Flag (Maybe Int) -> ProjectConfigBuildOnly)
-> f (Flag (Maybe Int)) -> f ProjectConfigBuildOnly
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag (Maybe Int)
x -> ProjectConfigBuildOnly
s{T.projectConfigNumJobs = x}) (Flag (Maybe Int) -> f (Flag (Maybe Int))
f (ProjectConfigBuildOnly -> Flag (Maybe Int)
T.projectConfigNumJobs ProjectConfigBuildOnly
s))
{-# INLINEABLE projectConfigNumJobs #-}
projectConfigUseSemaphore :: Lens' ProjectConfigBuildOnly (Flag Bool)
projectConfigUseSemaphore :: Lens' ProjectConfigBuildOnly (Flag Bool)
projectConfigUseSemaphore Flag Bool -> f (Flag Bool)
f ProjectConfigBuildOnly
s = (Flag Bool -> ProjectConfigBuildOnly)
-> f (Flag Bool) -> f ProjectConfigBuildOnly
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag Bool
x -> ProjectConfigBuildOnly
s{T.projectConfigUseSemaphore = x}) (Flag Bool -> f (Flag Bool)
f (ProjectConfigBuildOnly -> Flag Bool
T.projectConfigUseSemaphore ProjectConfigBuildOnly
s))
{-# INLINEABLE projectConfigUseSemaphore #-}
projectConfigKeepGoing :: Lens' ProjectConfigBuildOnly (Flag Bool)
projectConfigKeepGoing :: Lens' ProjectConfigBuildOnly (Flag Bool)
projectConfigKeepGoing Flag Bool -> f (Flag Bool)
f ProjectConfigBuildOnly
s = (Flag Bool -> ProjectConfigBuildOnly)
-> f (Flag Bool) -> f ProjectConfigBuildOnly
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag Bool
x -> ProjectConfigBuildOnly
s{T.projectConfigKeepGoing = x}) (Flag Bool -> f (Flag Bool)
f (ProjectConfigBuildOnly -> Flag Bool
T.projectConfigKeepGoing ProjectConfigBuildOnly
s))
{-# INLINEABLE projectConfigKeepGoing #-}
projectConfigOfflineMode :: Lens' ProjectConfigBuildOnly (Flag Bool)
projectConfigOfflineMode :: Lens' ProjectConfigBuildOnly (Flag Bool)
projectConfigOfflineMode Flag Bool -> f (Flag Bool)
f ProjectConfigBuildOnly
s = (Flag Bool -> ProjectConfigBuildOnly)
-> f (Flag Bool) -> f ProjectConfigBuildOnly
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag Bool
x -> ProjectConfigBuildOnly
s{T.projectConfigOfflineMode = x}) (Flag Bool -> f (Flag Bool)
f (ProjectConfigBuildOnly -> Flag Bool
T.projectConfigOfflineMode ProjectConfigBuildOnly
s))
{-# INLINEABLE projectConfigOfflineMode #-}
projectConfigKeepTempFiles :: Lens' ProjectConfigBuildOnly (Flag Bool)
projectConfigKeepTempFiles :: Lens' ProjectConfigBuildOnly (Flag Bool)
projectConfigKeepTempFiles Flag Bool -> f (Flag Bool)
f ProjectConfigBuildOnly
s = (Flag Bool -> ProjectConfigBuildOnly)
-> f (Flag Bool) -> f ProjectConfigBuildOnly
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag Bool
x -> ProjectConfigBuildOnly
s{T.projectConfigKeepTempFiles = x}) (Flag Bool -> f (Flag Bool)
f (ProjectConfigBuildOnly -> Flag Bool
T.projectConfigKeepTempFiles ProjectConfigBuildOnly
s))
{-# INLINEABLE projectConfigKeepTempFiles #-}
projectConfigHttpTransport :: Lens' ProjectConfigBuildOnly (Flag String)
projectConfigHttpTransport :: Lens' ProjectConfigBuildOnly (Flag String)
projectConfigHttpTransport Flag String -> f (Flag String)
f ProjectConfigBuildOnly
s = (Flag String -> ProjectConfigBuildOnly)
-> f (Flag String) -> f ProjectConfigBuildOnly
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag String
x -> ProjectConfigBuildOnly
s{T.projectConfigHttpTransport = x}) (Flag String -> f (Flag String)
f (ProjectConfigBuildOnly -> Flag String
T.projectConfigHttpTransport ProjectConfigBuildOnly
s))
{-# INLINEABLE projectConfigHttpTransport #-}
projectConfigIgnoreExpiry :: Lens' ProjectConfigBuildOnly (Flag Bool)
projectConfigIgnoreExpiry :: Lens' ProjectConfigBuildOnly (Flag Bool)
projectConfigIgnoreExpiry Flag Bool -> f (Flag Bool)
f ProjectConfigBuildOnly
s = (Flag Bool -> ProjectConfigBuildOnly)
-> f (Flag Bool) -> f ProjectConfigBuildOnly
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag Bool
x -> ProjectConfigBuildOnly
s{T.projectConfigIgnoreExpiry = x}) (Flag Bool -> f (Flag Bool)
f (ProjectConfigBuildOnly -> Flag Bool
T.projectConfigIgnoreExpiry ProjectConfigBuildOnly
s))
{-# INLINEABLE projectConfigIgnoreExpiry #-}
projectConfigCacheDir :: Lens' ProjectConfigBuildOnly (Flag FilePath)
projectConfigCacheDir :: Lens' ProjectConfigBuildOnly (Flag String)
projectConfigCacheDir Flag String -> f (Flag String)
f ProjectConfigBuildOnly
s = (Flag String -> ProjectConfigBuildOnly)
-> f (Flag String) -> f ProjectConfigBuildOnly
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag String
x -> ProjectConfigBuildOnly
s{T.projectConfigCacheDir = x}) (Flag String -> f (Flag String)
f (ProjectConfigBuildOnly -> Flag String
T.projectConfigCacheDir ProjectConfigBuildOnly
s))
{-# INLINEABLE projectConfigCacheDir #-}
projectConfigLogsDir :: Lens' ProjectConfigBuildOnly (Flag FilePath)
projectConfigLogsDir :: Lens' ProjectConfigBuildOnly (Flag String)
projectConfigLogsDir Flag String -> f (Flag String)
f ProjectConfigBuildOnly
s = (Flag String -> ProjectConfigBuildOnly)
-> f (Flag String) -> f ProjectConfigBuildOnly
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag String
x -> ProjectConfigBuildOnly
s{T.projectConfigLogsDir = x}) (Flag String -> f (Flag String)
f (ProjectConfigBuildOnly -> Flag String
T.projectConfigLogsDir ProjectConfigBuildOnly
s))
{-# INLINEABLE projectConfigLogsDir #-}
projectConfigClientInstallFlags :: Lens' ProjectConfigBuildOnly ClientInstallFlags
projectConfigClientInstallFlags :: Lens' ProjectConfigBuildOnly ClientInstallFlags
projectConfigClientInstallFlags ClientInstallFlags -> f ClientInstallFlags
f ProjectConfigBuildOnly
s = (ClientInstallFlags -> ProjectConfigBuildOnly)
-> f ClientInstallFlags -> f ProjectConfigBuildOnly
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\ClientInstallFlags
x -> ProjectConfigBuildOnly
s{T.projectConfigClientInstallFlags = x}) (ClientInstallFlags -> f ClientInstallFlags
f (ProjectConfigBuildOnly -> ClientInstallFlags
T.projectConfigClientInstallFlags ProjectConfigBuildOnly
s))
{-# INLINEABLE projectConfigClientInstallFlags #-}
projectConfigDistDir :: Lens' ProjectConfigShared (Flag FilePath)
projectConfigDistDir :: Lens' ProjectConfigShared (Flag String)
projectConfigDistDir Flag String -> f (Flag String)
f ProjectConfigShared
s = (Flag String -> ProjectConfigShared)
-> f (Flag String) -> f ProjectConfigShared
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag String
x -> ProjectConfigShared
s{T.projectConfigDistDir = x}) (Flag String -> f (Flag String)
f (ProjectConfigShared -> Flag String
T.projectConfigDistDir ProjectConfigShared
s))
{-# INLINEABLE projectConfigDistDir #-}
projectConfigProjectDir :: Lens' ProjectConfigShared (Flag FilePath)
projectConfigProjectDir :: Lens' ProjectConfigShared (Flag String)
projectConfigProjectDir Flag String -> f (Flag String)
f ProjectConfigShared
s = (Flag String -> ProjectConfigShared)
-> f (Flag String) -> f ProjectConfigShared
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag String
x -> ProjectConfigShared
s{T.projectConfigProjectDir = x}) (Flag String -> f (Flag String)
f (ProjectConfigShared -> Flag String
T.projectConfigProjectDir ProjectConfigShared
s))
{-# INLINEABLE projectConfigProjectDir #-}
projectConfigStoreDir :: Lens' ProjectConfigShared (Flag FilePath)
projectConfigStoreDir :: Lens' ProjectConfigShared (Flag String)
projectConfigStoreDir Flag String -> f (Flag String)
f ProjectConfigShared
s = (Flag String -> ProjectConfigShared)
-> f (Flag String) -> f ProjectConfigShared
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag String
x -> ProjectConfigShared
s{T.projectConfigStoreDir = x}) (Flag String -> f (Flag String)
f (ProjectConfigShared -> Flag String
T.projectConfigStoreDir ProjectConfigShared
s))
{-# INLINEABLE projectConfigStoreDir #-}
projectConfigPerComponent :: Lens' ProjectConfigShared (Flag Bool)
projectConfigPerComponent :: Lens' ProjectConfigShared (Flag Bool)
projectConfigPerComponent Flag Bool -> f (Flag Bool)
f ProjectConfigShared
s = (Flag Bool -> ProjectConfigShared)
-> f (Flag Bool) -> f ProjectConfigShared
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag Bool
x -> ProjectConfigShared
s{T.projectConfigPerComponent = x}) (Flag Bool -> f (Flag Bool)
f (ProjectConfigShared -> Flag Bool
T.projectConfigPerComponent ProjectConfigShared
s))
{-# INLINEABLE projectConfigPerComponent #-}
projectConfigIndependentGoals :: Lens' ProjectConfigShared (Flag IndependentGoals)
projectConfigIndependentGoals :: Lens' ProjectConfigShared (Flag IndependentGoals)
projectConfigIndependentGoals Flag IndependentGoals -> f (Flag IndependentGoals)
f ProjectConfigShared
s = (Flag IndependentGoals -> ProjectConfigShared)
-> f (Flag IndependentGoals) -> f ProjectConfigShared
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag IndependentGoals
x -> ProjectConfigShared
s{T.projectConfigIndependentGoals = x}) (Flag IndependentGoals -> f (Flag IndependentGoals)
f (ProjectConfigShared -> Flag IndependentGoals
T.projectConfigIndependentGoals ProjectConfigShared
s))
{-# INLINEABLE projectConfigIndependentGoals #-}
projectConfigProjectFile :: Lens' ProjectConfigShared (Flag FilePath)
projectConfigProjectFile :: Lens' ProjectConfigShared (Flag String)
projectConfigProjectFile Flag String -> f (Flag String)
f ProjectConfigShared
s = (Flag String -> ProjectConfigShared)
-> f (Flag String) -> f ProjectConfigShared
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag String
x -> ProjectConfigShared
s{T.projectConfigProjectFile = x}) (Flag String -> f (Flag String)
f (ProjectConfigShared -> Flag String
T.projectConfigProjectFile ProjectConfigShared
s))
{-# INLINEABLE projectConfigProjectFile #-}
projectConfigIgnoreProject :: Lens' ProjectConfigShared (Flag Bool)
projectConfigIgnoreProject :: Lens' ProjectConfigShared (Flag Bool)
projectConfigIgnoreProject Flag Bool -> f (Flag Bool)
f ProjectConfigShared
s = (Flag Bool -> ProjectConfigShared)
-> f (Flag Bool) -> f ProjectConfigShared
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag Bool
x -> ProjectConfigShared
s{T.projectConfigIgnoreProject = x}) (Flag Bool -> f (Flag Bool)
f (ProjectConfigShared -> Flag Bool
T.projectConfigIgnoreProject ProjectConfigShared
s))
{-# INLINEABLE projectConfigIgnoreProject #-}
projectConfigHcFlavor :: Lens' ProjectConfigShared (Flag CompilerFlavor)
projectConfigHcFlavor :: Lens' ProjectConfigShared (Flag CompilerFlavor)
projectConfigHcFlavor Flag CompilerFlavor -> f (Flag CompilerFlavor)
f ProjectConfigShared
s = (Flag CompilerFlavor -> ProjectConfigShared)
-> f (Flag CompilerFlavor) -> f ProjectConfigShared
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag CompilerFlavor
x -> ProjectConfigShared
s{T.projectConfigHcFlavor = x}) (Flag CompilerFlavor -> f (Flag CompilerFlavor)
f (ProjectConfigShared -> Flag CompilerFlavor
T.projectConfigHcFlavor ProjectConfigShared
s))
{-# INLINEABLE projectConfigHcFlavor #-}
projectConfigHcPath :: Lens' ProjectConfigShared (Flag FilePath)
projectConfigHcPath :: Lens' ProjectConfigShared (Flag String)
projectConfigHcPath Flag String -> f (Flag String)
f ProjectConfigShared
s = (Flag String -> ProjectConfigShared)
-> f (Flag String) -> f ProjectConfigShared
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag String
x -> ProjectConfigShared
s{T.projectConfigHcPath = x}) (Flag String -> f (Flag String)
f (ProjectConfigShared -> Flag String
T.projectConfigHcPath ProjectConfigShared
s))
{-# INLINEABLE projectConfigHcPath #-}
projectConfigHcPkg :: Lens' ProjectConfigShared (Flag FilePath)
projectConfigHcPkg :: Lens' ProjectConfigShared (Flag String)
projectConfigHcPkg Flag String -> f (Flag String)
f ProjectConfigShared
s = (Flag String -> ProjectConfigShared)
-> f (Flag String) -> f ProjectConfigShared
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag String
x -> ProjectConfigShared
s{T.projectConfigHcPkg = x}) (Flag String -> f (Flag String)
f (ProjectConfigShared -> Flag String
T.projectConfigHcPkg ProjectConfigShared
s))
{-# INLINEABLE projectConfigHcPkg #-}
projectConfigHaddockIndex :: Lens' ProjectConfigShared (Flag PathTemplate)
projectConfigHaddockIndex :: Lens' ProjectConfigShared (Flag PathTemplate)
projectConfigHaddockIndex Flag PathTemplate -> f (Flag PathTemplate)
f ProjectConfigShared
s = (Flag PathTemplate -> ProjectConfigShared)
-> f (Flag PathTemplate) -> f ProjectConfigShared
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag PathTemplate
x -> ProjectConfigShared
s{T.projectConfigHaddockIndex = x}) (Flag PathTemplate -> f (Flag PathTemplate)
f (ProjectConfigShared -> Flag PathTemplate
T.projectConfigHaddockIndex ProjectConfigShared
s))
{-# INLINEABLE projectConfigHaddockIndex #-}
projectConfigInstallDirs :: Lens' ProjectConfigShared (InstallDirs (Flag PathTemplate))
projectConfigInstallDirs :: Lens' ProjectConfigShared (InstallDirs (Flag PathTemplate))
projectConfigInstallDirs InstallDirs (Flag PathTemplate)
-> f (InstallDirs (Flag PathTemplate))
f ProjectConfigShared
s = (InstallDirs (Flag PathTemplate) -> ProjectConfigShared)
-> f (InstallDirs (Flag PathTemplate)) -> f ProjectConfigShared
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\InstallDirs (Flag PathTemplate)
x -> ProjectConfigShared
s{T.projectConfigInstallDirs = x}) (InstallDirs (Flag PathTemplate)
-> f (InstallDirs (Flag PathTemplate))
f (ProjectConfigShared -> InstallDirs (Flag PathTemplate)
T.projectConfigInstallDirs ProjectConfigShared
s))
{-# INLINEABLE projectConfigInstallDirs #-}
projectConfigPackageDBs :: Lens' ProjectConfigShared [Maybe PackageDBCWD]
projectConfigPackageDBs :: Lens' ProjectConfigShared [Maybe PackageDBCWD]
projectConfigPackageDBs [Maybe PackageDBCWD] -> f [Maybe PackageDBCWD]
f ProjectConfigShared
s = ([Maybe PackageDBCWD] -> ProjectConfigShared)
-> f [Maybe PackageDBCWD] -> f ProjectConfigShared
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\[Maybe PackageDBCWD]
x -> ProjectConfigShared
s{T.projectConfigPackageDBs = x}) ([Maybe PackageDBCWD] -> f [Maybe PackageDBCWD]
f (ProjectConfigShared -> [Maybe PackageDBCWD]
T.projectConfigPackageDBs ProjectConfigShared
s))
{-# INLINEABLE projectConfigPackageDBs #-}
projectConfigLocalNoIndexRepos :: Lens' ProjectConfigShared (NubList LocalRepo)
projectConfigLocalNoIndexRepos :: Lens' ProjectConfigShared (NubList LocalRepo)
projectConfigLocalNoIndexRepos NubList LocalRepo -> f (NubList LocalRepo)
f ProjectConfigShared
s = (NubList LocalRepo -> ProjectConfigShared)
-> f (NubList LocalRepo) -> f ProjectConfigShared
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\NubList LocalRepo
x -> ProjectConfigShared
s{T.projectConfigLocalNoIndexRepos = x}) (NubList LocalRepo -> f (NubList LocalRepo)
f (ProjectConfigShared -> NubList LocalRepo
T.projectConfigLocalNoIndexRepos ProjectConfigShared
s))
{-# INLINEABLE projectConfigLocalNoIndexRepos #-}
projectConfigRemoteRepos :: Lens' ProjectConfigShared (NubList RemoteRepo)
projectConfigRemoteRepos :: Lens' ProjectConfigShared (NubList RemoteRepo)
projectConfigRemoteRepos NubList RemoteRepo -> f (NubList RemoteRepo)
f ProjectConfigShared
s = (NubList RemoteRepo -> ProjectConfigShared)
-> f (NubList RemoteRepo) -> f ProjectConfigShared
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\NubList RemoteRepo
x -> ProjectConfigShared
s{T.projectConfigRemoteRepos = x}) (NubList RemoteRepo -> f (NubList RemoteRepo)
f (ProjectConfigShared -> NubList RemoteRepo
T.projectConfigRemoteRepos ProjectConfigShared
s))
{-# INLINEABLE projectConfigRemoteRepos #-}
projectConfigActiveRepos :: Lens' ProjectConfigShared (Flag ActiveRepos)
projectConfigActiveRepos :: Lens' ProjectConfigShared (Flag ActiveRepos)
projectConfigActiveRepos Flag ActiveRepos -> f (Flag ActiveRepos)
f ProjectConfigShared
s = (Flag ActiveRepos -> ProjectConfigShared)
-> f (Flag ActiveRepos) -> f ProjectConfigShared
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag ActiveRepos
x -> ProjectConfigShared
s{T.projectConfigActiveRepos = x}) (Flag ActiveRepos -> f (Flag ActiveRepos)
f (ProjectConfigShared -> Flag ActiveRepos
T.projectConfigActiveRepos ProjectConfigShared
s))
{-# INLINEABLE projectConfigActiveRepos #-}
projectConfigIndexState :: Lens' ProjectConfigShared (Flag TotalIndexState)
projectConfigIndexState :: Lens' ProjectConfigShared (Flag TotalIndexState)
projectConfigIndexState Flag TotalIndexState -> f (Flag TotalIndexState)
f ProjectConfigShared
s = (Flag TotalIndexState -> ProjectConfigShared)
-> f (Flag TotalIndexState) -> f ProjectConfigShared
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag TotalIndexState
x -> ProjectConfigShared
s{T.projectConfigIndexState = x}) (Flag TotalIndexState -> f (Flag TotalIndexState)
f (ProjectConfigShared -> Flag TotalIndexState
T.projectConfigIndexState ProjectConfigShared
s))
{-# INLINEABLE projectConfigIndexState #-}
projectConfigConstraints :: Lens' ProjectConfigShared [(UserConstraint, ConstraintSource)]
projectConfigConstraints :: Lens' ProjectConfigShared [(UserConstraint, ConstraintSource)]
projectConfigConstraints [(UserConstraint, ConstraintSource)]
-> f [(UserConstraint, ConstraintSource)]
f ProjectConfigShared
s = ([(UserConstraint, ConstraintSource)] -> ProjectConfigShared)
-> f [(UserConstraint, ConstraintSource)] -> f ProjectConfigShared
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\[(UserConstraint, ConstraintSource)]
x -> ProjectConfigShared
s{T.projectConfigConstraints = x}) ([(UserConstraint, ConstraintSource)]
-> f [(UserConstraint, ConstraintSource)]
f (ProjectConfigShared -> [(UserConstraint, ConstraintSource)]
T.projectConfigConstraints ProjectConfigShared
s))
{-# INLINEABLE projectConfigConstraints #-}
projectConfigPreferences :: Lens' ProjectConfigShared [PackageVersionConstraint]
projectConfigPreferences :: Lens' ProjectConfigShared [PackageVersionConstraint]
projectConfigPreferences [PackageVersionConstraint] -> f [PackageVersionConstraint]
f ProjectConfigShared
s = ([PackageVersionConstraint] -> ProjectConfigShared)
-> f [PackageVersionConstraint] -> f ProjectConfigShared
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\[PackageVersionConstraint]
x -> ProjectConfigShared
s{T.projectConfigPreferences = x}) ([PackageVersionConstraint] -> f [PackageVersionConstraint]
f (ProjectConfigShared -> [PackageVersionConstraint]
T.projectConfigPreferences ProjectConfigShared
s))
{-# INLINEABLE projectConfigPreferences #-}
projectConfigCabalVersion :: Lens' ProjectConfigShared (Flag Version)
projectConfigCabalVersion :: Lens' ProjectConfigShared (Flag Version)
projectConfigCabalVersion Flag Version -> f (Flag Version)
f ProjectConfigShared
s = (Flag Version -> ProjectConfigShared)
-> f (Flag Version) -> f ProjectConfigShared
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag Version
x -> ProjectConfigShared
s{T.projectConfigCabalVersion = x}) (Flag Version -> f (Flag Version)
f (ProjectConfigShared -> Flag Version
T.projectConfigCabalVersion ProjectConfigShared
s))
{-# INLINEABLE projectConfigCabalVersion #-}
projectConfigSolver :: Lens' ProjectConfigShared (Flag PreSolver)
projectConfigSolver :: Lens' ProjectConfigShared (Flag PreSolver)
projectConfigSolver Flag PreSolver -> f (Flag PreSolver)
f ProjectConfigShared
s = (Flag PreSolver -> ProjectConfigShared)
-> f (Flag PreSolver) -> f ProjectConfigShared
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag PreSolver
x -> ProjectConfigShared
s{T.projectConfigSolver = x}) (Flag PreSolver -> f (Flag PreSolver)
f (ProjectConfigShared -> Flag PreSolver
T.projectConfigSolver ProjectConfigShared
s))
{-# INLINEABLE projectConfigSolver #-}
projectConfigAllowOlder :: Lens' ProjectConfigShared (Maybe AllowOlder)
projectConfigAllowOlder :: Lens' ProjectConfigShared (Maybe AllowOlder)
projectConfigAllowOlder Maybe AllowOlder -> f (Maybe AllowOlder)
f ProjectConfigShared
s = (Maybe AllowOlder -> ProjectConfigShared)
-> f (Maybe AllowOlder) -> f ProjectConfigShared
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Maybe AllowOlder
x -> ProjectConfigShared
s{T.projectConfigAllowOlder = x}) (Maybe AllowOlder -> f (Maybe AllowOlder)
f (ProjectConfigShared -> Maybe AllowOlder
T.projectConfigAllowOlder ProjectConfigShared
s))
{-# INLINEABLE projectConfigAllowOlder #-}
projectConfigAllowNewer :: Lens' ProjectConfigShared (Maybe AllowNewer)
projectConfigAllowNewer :: Lens' ProjectConfigShared (Maybe AllowNewer)
projectConfigAllowNewer Maybe AllowNewer -> f (Maybe AllowNewer)
f ProjectConfigShared
s = (Maybe AllowNewer -> ProjectConfigShared)
-> f (Maybe AllowNewer) -> f ProjectConfigShared
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Maybe AllowNewer
x -> ProjectConfigShared
s{T.projectConfigAllowNewer = x}) (Maybe AllowNewer -> f (Maybe AllowNewer)
f (ProjectConfigShared -> Maybe AllowNewer
T.projectConfigAllowNewer ProjectConfigShared
s))
{-# INLINEABLE projectConfigAllowNewer #-}
projectConfigWriteGhcEnvironmentFilesPolicy :: Lens' ProjectConfigShared (Flag WriteGhcEnvironmentFilesPolicy)
projectConfigWriteGhcEnvironmentFilesPolicy :: Lens' ProjectConfigShared (Flag WriteGhcEnvironmentFilesPolicy)
projectConfigWriteGhcEnvironmentFilesPolicy Flag WriteGhcEnvironmentFilesPolicy
-> f (Flag WriteGhcEnvironmentFilesPolicy)
f ProjectConfigShared
s = (Flag WriteGhcEnvironmentFilesPolicy -> ProjectConfigShared)
-> f (Flag WriteGhcEnvironmentFilesPolicy) -> f ProjectConfigShared
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag WriteGhcEnvironmentFilesPolicy
x -> ProjectConfigShared
s{T.projectConfigWriteGhcEnvironmentFilesPolicy = x}) (Flag WriteGhcEnvironmentFilesPolicy
-> f (Flag WriteGhcEnvironmentFilesPolicy)
f (ProjectConfigShared -> Flag WriteGhcEnvironmentFilesPolicy
T.projectConfigWriteGhcEnvironmentFilesPolicy ProjectConfigShared
s))
{-# INLINEABLE projectConfigWriteGhcEnvironmentFilesPolicy #-}
projectConfigMaxBackjumps :: Lens' ProjectConfigShared (Flag Int)
projectConfigMaxBackjumps :: Lens' ProjectConfigShared (Flag Int)
projectConfigMaxBackjumps Flag Int -> f (Flag Int)
f ProjectConfigShared
s = (Flag Int -> ProjectConfigShared)
-> f (Flag Int) -> f ProjectConfigShared
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag Int
x -> ProjectConfigShared
s{T.projectConfigMaxBackjumps = x}) (Flag Int -> f (Flag Int)
f (ProjectConfigShared -> Flag Int
T.projectConfigMaxBackjumps ProjectConfigShared
s))
{-# INLINEABLE projectConfigMaxBackjumps #-}
projectConfigReorderGoals :: Lens' ProjectConfigShared (Flag ReorderGoals)
projectConfigReorderGoals :: Lens' ProjectConfigShared (Flag ReorderGoals)
projectConfigReorderGoals Flag ReorderGoals -> f (Flag ReorderGoals)
f ProjectConfigShared
s = (Flag ReorderGoals -> ProjectConfigShared)
-> f (Flag ReorderGoals) -> f ProjectConfigShared
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag ReorderGoals
x -> ProjectConfigShared
s{T.projectConfigReorderGoals = x}) (Flag ReorderGoals -> f (Flag ReorderGoals)
f (ProjectConfigShared -> Flag ReorderGoals
T.projectConfigReorderGoals ProjectConfigShared
s))
{-# INLINEABLE projectConfigReorderGoals #-}
projectConfigCountConflicts :: Lens' ProjectConfigShared (Flag CountConflicts)
projectConfigCountConflicts :: Lens' ProjectConfigShared (Flag CountConflicts)
projectConfigCountConflicts Flag CountConflicts -> f (Flag CountConflicts)
f ProjectConfigShared
s = (Flag CountConflicts -> ProjectConfigShared)
-> f (Flag CountConflicts) -> f ProjectConfigShared
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag CountConflicts
x -> ProjectConfigShared
s{T.projectConfigCountConflicts = x}) (Flag CountConflicts -> f (Flag CountConflicts)
f (ProjectConfigShared -> Flag CountConflicts
T.projectConfigCountConflicts ProjectConfigShared
s))
{-# INLINEABLE projectConfigCountConflicts #-}
projectConfigFineGrainedConflicts :: Lens' ProjectConfigShared (Flag FineGrainedConflicts)
projectConfigFineGrainedConflicts :: Lens' ProjectConfigShared (Flag FineGrainedConflicts)
projectConfigFineGrainedConflicts Flag FineGrainedConflicts -> f (Flag FineGrainedConflicts)
f ProjectConfigShared
s = (Flag FineGrainedConflicts -> ProjectConfigShared)
-> f (Flag FineGrainedConflicts) -> f ProjectConfigShared
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag FineGrainedConflicts
x -> ProjectConfigShared
s{T.projectConfigFineGrainedConflicts = x}) (Flag FineGrainedConflicts -> f (Flag FineGrainedConflicts)
f (ProjectConfigShared -> Flag FineGrainedConflicts
T.projectConfigFineGrainedConflicts ProjectConfigShared
s))
{-# INLINEABLE projectConfigFineGrainedConflicts #-}
projectConfigMinimizeConflictSet :: Lens' ProjectConfigShared (Flag MinimizeConflictSet)
projectConfigMinimizeConflictSet :: Lens' ProjectConfigShared (Flag MinimizeConflictSet)
projectConfigMinimizeConflictSet Flag MinimizeConflictSet -> f (Flag MinimizeConflictSet)
f ProjectConfigShared
s = (Flag MinimizeConflictSet -> ProjectConfigShared)
-> f (Flag MinimizeConflictSet) -> f ProjectConfigShared
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag MinimizeConflictSet
x -> ProjectConfigShared
s{T.projectConfigMinimizeConflictSet = x}) (Flag MinimizeConflictSet -> f (Flag MinimizeConflictSet)
f (ProjectConfigShared -> Flag MinimizeConflictSet
T.projectConfigMinimizeConflictSet ProjectConfigShared
s))
{-# INLINEABLE projectConfigMinimizeConflictSet #-}
projectConfigStrongFlags :: Lens' ProjectConfigShared (Flag StrongFlags)
projectConfigStrongFlags :: Lens' ProjectConfigShared (Flag StrongFlags)
projectConfigStrongFlags Flag StrongFlags -> f (Flag StrongFlags)
f ProjectConfigShared
s = (Flag StrongFlags -> ProjectConfigShared)
-> f (Flag StrongFlags) -> f ProjectConfigShared
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag StrongFlags
x -> ProjectConfigShared
s{T.projectConfigStrongFlags = x}) (Flag StrongFlags -> f (Flag StrongFlags)
f (ProjectConfigShared -> Flag StrongFlags
T.projectConfigStrongFlags ProjectConfigShared
s))
{-# INLINEABLE projectConfigStrongFlags #-}
projectConfigAllowBootLibInstalls :: Lens' ProjectConfigShared (Flag AllowBootLibInstalls)
projectConfigAllowBootLibInstalls :: Lens' ProjectConfigShared (Flag AllowBootLibInstalls)
projectConfigAllowBootLibInstalls Flag AllowBootLibInstalls -> f (Flag AllowBootLibInstalls)
f ProjectConfigShared
s = (Flag AllowBootLibInstalls -> ProjectConfigShared)
-> f (Flag AllowBootLibInstalls) -> f ProjectConfigShared
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag AllowBootLibInstalls
x -> ProjectConfigShared
s{T.projectConfigAllowBootLibInstalls = x}) (Flag AllowBootLibInstalls -> f (Flag AllowBootLibInstalls)
f (ProjectConfigShared -> Flag AllowBootLibInstalls
T.projectConfigAllowBootLibInstalls ProjectConfigShared
s))
{-# INLINEABLE projectConfigAllowBootLibInstalls #-}
projectConfigOnlyConstrained :: Lens' ProjectConfigShared (Flag OnlyConstrained)
projectConfigOnlyConstrained :: Lens' ProjectConfigShared (Flag OnlyConstrained)
projectConfigOnlyConstrained Flag OnlyConstrained -> f (Flag OnlyConstrained)
f ProjectConfigShared
s = (Flag OnlyConstrained -> ProjectConfigShared)
-> f (Flag OnlyConstrained) -> f ProjectConfigShared
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag OnlyConstrained
x -> ProjectConfigShared
s{T.projectConfigOnlyConstrained = x}) (Flag OnlyConstrained -> f (Flag OnlyConstrained)
f (ProjectConfigShared -> Flag OnlyConstrained
T.projectConfigOnlyConstrained ProjectConfigShared
s))
{-# INLINEABLE projectConfigOnlyConstrained #-}
projectConfigPreferOldest :: Lens' ProjectConfigShared (Flag PreferOldest)
projectConfigPreferOldest :: Lens' ProjectConfigShared (Flag PreferOldest)
projectConfigPreferOldest Flag PreferOldest -> f (Flag PreferOldest)
f ProjectConfigShared
s = (Flag PreferOldest -> ProjectConfigShared)
-> f (Flag PreferOldest) -> f ProjectConfigShared
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag PreferOldest
x -> ProjectConfigShared
s{T.projectConfigPreferOldest = x}) (Flag PreferOldest -> f (Flag PreferOldest)
f (ProjectConfigShared -> Flag PreferOldest
T.projectConfigPreferOldest ProjectConfigShared
s))
{-# INLINEABLE projectConfigPreferOldest #-}
projectConfigProgPathExtra :: Lens' ProjectConfigShared (NubList FilePath)
NubList String -> f (NubList String)
f ProjectConfigShared
s = (NubList String -> ProjectConfigShared)
-> f (NubList String) -> f ProjectConfigShared
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\NubList String
x -> ProjectConfigShared
s{T.projectConfigProgPathExtra = x}) (NubList String -> f (NubList String)
f (ProjectConfigShared -> NubList String
T.projectConfigProgPathExtra ProjectConfigShared
s))
{-# INLINEABLE projectConfigProgPathExtra #-}
projectConfigMultiRepl :: Lens' ProjectConfigShared (Flag Bool)
projectConfigMultiRepl :: Lens' ProjectConfigShared (Flag Bool)
projectConfigMultiRepl Flag Bool -> f (Flag Bool)
f ProjectConfigShared
s = (Flag Bool -> ProjectConfigShared)
-> f (Flag Bool) -> f ProjectConfigShared
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag Bool
x -> ProjectConfigShared
s{T.projectConfigMultiRepl = x}) (Flag Bool -> f (Flag Bool)
f (ProjectConfigShared -> Flag Bool
T.projectConfigMultiRepl ProjectConfigShared
s))
{-# INLINEABLE projectConfigMultiRepl #-}
packageConfigProgramPaths :: Lens' PackageConfig (MapLast String FilePath)
packageConfigProgramPaths :: Lens' PackageConfig (MapLast String String)
packageConfigProgramPaths MapLast String String -> f (MapLast String String)
f PackageConfig
s = (MapLast String String -> PackageConfig)
-> f (MapLast String String) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\MapLast String String
x -> PackageConfig
s{T.packageConfigProgramPaths = x}) (MapLast String String -> f (MapLast String String)
f (PackageConfig -> MapLast String String
T.packageConfigProgramPaths PackageConfig
s))
{-# INLINEABLE packageConfigProgramPaths #-}
packageConfigProgramArgs :: Lens' PackageConfig (MapMappend String [String])
packageConfigProgramArgs :: Lens' PackageConfig (MapMappend String [String])
packageConfigProgramArgs MapMappend String [String] -> f (MapMappend String [String])
f PackageConfig
s = (MapMappend String [String] -> PackageConfig)
-> f (MapMappend String [String]) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\MapMappend String [String]
x -> PackageConfig
s{T.packageConfigProgramArgs = x}) (MapMappend String [String] -> f (MapMappend String [String])
f (PackageConfig -> MapMappend String [String]
T.packageConfigProgramArgs PackageConfig
s))
{-# INLINEABLE packageConfigProgramArgs #-}
packageConfigProgramPathExtra :: Lens' PackageConfig (NubList FilePath)
NubList String -> f (NubList String)
f PackageConfig
s = (NubList String -> PackageConfig)
-> f (NubList String) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\NubList String
x -> PackageConfig
s{T.packageConfigProgramPathExtra = x}) (NubList String -> f (NubList String)
f (PackageConfig -> NubList String
T.packageConfigProgramPathExtra PackageConfig
s))
{-# INLINEABLE packageConfigProgramPathExtra #-}
packageConfigFlagAssignment :: Lens' PackageConfig FlagAssignment
packageConfigFlagAssignment :: Lens' PackageConfig FlagAssignment
packageConfigFlagAssignment FlagAssignment -> f FlagAssignment
f PackageConfig
s = (FlagAssignment -> PackageConfig)
-> f FlagAssignment -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\FlagAssignment
x -> PackageConfig
s{T.packageConfigFlagAssignment = x}) (FlagAssignment -> f FlagAssignment
f (PackageConfig -> FlagAssignment
T.packageConfigFlagAssignment PackageConfig
s))
{-# INLINEABLE packageConfigFlagAssignment #-}
packageConfigVanillaLib :: Lens' PackageConfig (Flag Bool)
packageConfigVanillaLib :: Lens' PackageConfig (Flag Bool)
packageConfigVanillaLib Flag Bool -> f (Flag Bool)
f PackageConfig
s = (Flag Bool -> PackageConfig) -> f (Flag Bool) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag Bool
x -> PackageConfig
s{T.packageConfigVanillaLib = x}) (Flag Bool -> f (Flag Bool)
f (PackageConfig -> Flag Bool
T.packageConfigVanillaLib PackageConfig
s))
{-# INLINEABLE packageConfigVanillaLib #-}
packageConfigSharedLib :: Lens' PackageConfig (Flag Bool)
packageConfigSharedLib :: Lens' PackageConfig (Flag Bool)
packageConfigSharedLib Flag Bool -> f (Flag Bool)
f PackageConfig
s = (Flag Bool -> PackageConfig) -> f (Flag Bool) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag Bool
x -> PackageConfig
s{T.packageConfigSharedLib = x}) (Flag Bool -> f (Flag Bool)
f (PackageConfig -> Flag Bool
T.packageConfigSharedLib PackageConfig
s))
{-# INLINEABLE packageConfigSharedLib #-}
packageConfigStaticLib :: Lens' PackageConfig (Flag Bool)
packageConfigStaticLib :: Lens' PackageConfig (Flag Bool)
packageConfigStaticLib Flag Bool -> f (Flag Bool)
f PackageConfig
s = (Flag Bool -> PackageConfig) -> f (Flag Bool) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag Bool
x -> PackageConfig
s{T.packageConfigStaticLib = x}) (Flag Bool -> f (Flag Bool)
f (PackageConfig -> Flag Bool
T.packageConfigStaticLib PackageConfig
s))
{-# INLINEABLE packageConfigStaticLib #-}
packageConfigBytecodeLib :: Lens' PackageConfig (Flag Bool)
packageConfigBytecodeLib :: Lens' PackageConfig (Flag Bool)
packageConfigBytecodeLib Flag Bool -> f (Flag Bool)
f PackageConfig
s = (Flag Bool -> PackageConfig) -> f (Flag Bool) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag Bool
x -> PackageConfig
s{T.packageConfigBytecodeLib = x}) (Flag Bool -> f (Flag Bool)
f (PackageConfig -> Flag Bool
T.packageConfigBytecodeLib PackageConfig
s))
{-# INLINEABLE packageConfigBytecodeLib #-}
packageConfigDynExe :: Lens' PackageConfig (Flag Bool)
packageConfigDynExe :: Lens' PackageConfig (Flag Bool)
packageConfigDynExe Flag Bool -> f (Flag Bool)
f PackageConfig
s = (Flag Bool -> PackageConfig) -> f (Flag Bool) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag Bool
x -> PackageConfig
s{T.packageConfigDynExe = x}) (Flag Bool -> f (Flag Bool)
f (PackageConfig -> Flag Bool
T.packageConfigDynExe PackageConfig
s))
{-# INLINEABLE packageConfigDynExe #-}
packageConfigFullyStaticExe :: Lens' PackageConfig (Flag Bool)
packageConfigFullyStaticExe :: Lens' PackageConfig (Flag Bool)
packageConfigFullyStaticExe Flag Bool -> f (Flag Bool)
f PackageConfig
s = (Flag Bool -> PackageConfig) -> f (Flag Bool) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag Bool
x -> PackageConfig
s{T.packageConfigFullyStaticExe = x}) (Flag Bool -> f (Flag Bool)
f (PackageConfig -> Flag Bool
T.packageConfigFullyStaticExe PackageConfig
s))
{-# INLINEABLE packageConfigFullyStaticExe #-}
packageConfigProf :: Lens' PackageConfig (Flag Bool)
packageConfigProf :: Lens' PackageConfig (Flag Bool)
packageConfigProf Flag Bool -> f (Flag Bool)
f PackageConfig
s = (Flag Bool -> PackageConfig) -> f (Flag Bool) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag Bool
x -> PackageConfig
s{T.packageConfigProf = x}) (Flag Bool -> f (Flag Bool)
f (PackageConfig -> Flag Bool
T.packageConfigProf PackageConfig
s))
{-# INLINEABLE packageConfigProf #-}
packageConfigProfLib :: Lens' PackageConfig (Flag Bool)
packageConfigProfLib :: Lens' PackageConfig (Flag Bool)
packageConfigProfLib Flag Bool -> f (Flag Bool)
f PackageConfig
s = (Flag Bool -> PackageConfig) -> f (Flag Bool) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag Bool
x -> PackageConfig
s{T.packageConfigProfLib = x}) (Flag Bool -> f (Flag Bool)
f (PackageConfig -> Flag Bool
T.packageConfigProfLib PackageConfig
s))
{-# INLINEABLE packageConfigProfLib #-}
packageConfigProfShared :: Lens' PackageConfig (Flag Bool)
packageConfigProfShared :: Lens' PackageConfig (Flag Bool)
packageConfigProfShared Flag Bool -> f (Flag Bool)
f PackageConfig
s = (Flag Bool -> PackageConfig) -> f (Flag Bool) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag Bool
x -> PackageConfig
s{T.packageConfigProfShared = x}) (Flag Bool -> f (Flag Bool)
f (PackageConfig -> Flag Bool
T.packageConfigProfShared PackageConfig
s))
{-# INLINEABLE packageConfigProfShared #-}
packageConfigProfExe :: Lens' PackageConfig (Flag Bool)
packageConfigProfExe :: Lens' PackageConfig (Flag Bool)
packageConfigProfExe Flag Bool -> f (Flag Bool)
f PackageConfig
s = (Flag Bool -> PackageConfig) -> f (Flag Bool) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag Bool
x -> PackageConfig
s{T.packageConfigProfExe = x}) (Flag Bool -> f (Flag Bool)
f (PackageConfig -> Flag Bool
T.packageConfigProfExe PackageConfig
s))
{-# INLINEABLE packageConfigProfExe #-}
packageConfigProfDetail :: Lens' PackageConfig (Flag ProfDetailLevel)
packageConfigProfDetail :: Lens' PackageConfig (Flag ProfDetailLevel)
packageConfigProfDetail Flag ProfDetailLevel -> f (Flag ProfDetailLevel)
f PackageConfig
s = (Flag ProfDetailLevel -> PackageConfig)
-> f (Flag ProfDetailLevel) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag ProfDetailLevel
x -> PackageConfig
s{T.packageConfigProfDetail = x}) (Flag ProfDetailLevel -> f (Flag ProfDetailLevel)
f (PackageConfig -> Flag ProfDetailLevel
T.packageConfigProfDetail PackageConfig
s))
{-# INLINEABLE packageConfigProfDetail #-}
packageConfigProfLibDetail :: Lens' PackageConfig (Flag ProfDetailLevel)
packageConfigProfLibDetail :: Lens' PackageConfig (Flag ProfDetailLevel)
packageConfigProfLibDetail Flag ProfDetailLevel -> f (Flag ProfDetailLevel)
f PackageConfig
s = (Flag ProfDetailLevel -> PackageConfig)
-> f (Flag ProfDetailLevel) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag ProfDetailLevel
x -> PackageConfig
s{T.packageConfigProfLibDetail = x}) (Flag ProfDetailLevel -> f (Flag ProfDetailLevel)
f (PackageConfig -> Flag ProfDetailLevel
T.packageConfigProfLibDetail PackageConfig
s))
{-# INLINEABLE packageConfigProfLibDetail #-}
packageConfigConfigureArgs :: Lens' PackageConfig [String]
packageConfigConfigureArgs :: Lens' PackageConfig [String]
packageConfigConfigureArgs [String] -> f [String]
f PackageConfig
s = ([String] -> PackageConfig) -> f [String] -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\[String]
x -> PackageConfig
s{T.packageConfigConfigureArgs = x}) ([String] -> f [String]
f (PackageConfig -> [String]
T.packageConfigConfigureArgs PackageConfig
s))
{-# INLINEABLE packageConfigConfigureArgs #-}
packageConfigOptimization :: Lens' PackageConfig (Flag OptimisationLevel)
packageConfigOptimization :: Lens' PackageConfig (Flag OptimisationLevel)
packageConfigOptimization Flag OptimisationLevel -> f (Flag OptimisationLevel)
f PackageConfig
s = (Flag OptimisationLevel -> PackageConfig)
-> f (Flag OptimisationLevel) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag OptimisationLevel
x -> PackageConfig
s{T.packageConfigOptimization = x}) (Flag OptimisationLevel -> f (Flag OptimisationLevel)
f (PackageConfig -> Flag OptimisationLevel
T.packageConfigOptimization PackageConfig
s))
{-# INLINEABLE packageConfigOptimization #-}
packageConfigProgPrefix :: Lens' PackageConfig (Flag PathTemplate)
packageConfigProgPrefix :: Lens' PackageConfig (Flag PathTemplate)
packageConfigProgPrefix Flag PathTemplate -> f (Flag PathTemplate)
f PackageConfig
s = (Flag PathTemplate -> PackageConfig)
-> f (Flag PathTemplate) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag PathTemplate
x -> PackageConfig
s{T.packageConfigProgPrefix = x}) (Flag PathTemplate -> f (Flag PathTemplate)
f (PackageConfig -> Flag PathTemplate
T.packageConfigProgPrefix PackageConfig
s))
{-# INLINEABLE packageConfigProgPrefix #-}
packageConfigProgSuffix :: Lens' PackageConfig (Flag PathTemplate)
packageConfigProgSuffix :: Lens' PackageConfig (Flag PathTemplate)
packageConfigProgSuffix Flag PathTemplate -> f (Flag PathTemplate)
f PackageConfig
s = (Flag PathTemplate -> PackageConfig)
-> f (Flag PathTemplate) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag PathTemplate
x -> PackageConfig
s{T.packageConfigProgSuffix = x}) (Flag PathTemplate -> f (Flag PathTemplate)
f (PackageConfig -> Flag PathTemplate
T.packageConfigProgSuffix PackageConfig
s))
{-# INLINEABLE packageConfigProgSuffix #-}
packageConfigExtraLibDirs :: Lens' PackageConfig [FilePath]
[String] -> f [String]
f PackageConfig
s = ([String] -> PackageConfig) -> f [String] -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\[String]
x -> PackageConfig
s{T.packageConfigExtraLibDirs = x}) ([String] -> f [String]
f (PackageConfig -> [String]
T.packageConfigExtraLibDirs PackageConfig
s))
{-# INLINEABLE packageConfigExtraLibDirs #-}
packageConfigExtraLibDirsStatic :: Lens' PackageConfig [FilePath]
[String] -> f [String]
f PackageConfig
s = ([String] -> PackageConfig) -> f [String] -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\[String]
x -> PackageConfig
s{T.packageConfigExtraLibDirsStatic = x}) ([String] -> f [String]
f (PackageConfig -> [String]
T.packageConfigExtraLibDirsStatic PackageConfig
s))
{-# INLINEABLE packageConfigExtraLibDirsStatic #-}
packageConfigExtraFrameworkDirs :: Lens' PackageConfig [FilePath]
[String] -> f [String]
f PackageConfig
s = ([String] -> PackageConfig) -> f [String] -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\[String]
x -> PackageConfig
s{T.packageConfigExtraFrameworkDirs = x}) ([String] -> f [String]
f (PackageConfig -> [String]
T.packageConfigExtraFrameworkDirs PackageConfig
s))
{-# INLINEABLE packageConfigExtraFrameworkDirs #-}
packageConfigExtraIncludeDirs :: Lens' PackageConfig [FilePath]
[String] -> f [String]
f PackageConfig
s = ([String] -> PackageConfig) -> f [String] -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\[String]
x -> PackageConfig
s{T.packageConfigExtraIncludeDirs = x}) ([String] -> f [String]
f (PackageConfig -> [String]
T.packageConfigExtraIncludeDirs PackageConfig
s))
{-# INLINEABLE packageConfigExtraIncludeDirs #-}
packageConfigGHCiLib :: Lens' PackageConfig (Flag Bool)
packageConfigGHCiLib :: Lens' PackageConfig (Flag Bool)
packageConfigGHCiLib Flag Bool -> f (Flag Bool)
f PackageConfig
s = (Flag Bool -> PackageConfig) -> f (Flag Bool) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag Bool
x -> PackageConfig
s{T.packageConfigGHCiLib = x}) (Flag Bool -> f (Flag Bool)
f (PackageConfig -> Flag Bool
T.packageConfigGHCiLib PackageConfig
s))
{-# INLINEABLE packageConfigGHCiLib #-}
packageConfigSplitSections :: Lens' PackageConfig (Flag Bool)
packageConfigSplitSections :: Lens' PackageConfig (Flag Bool)
packageConfigSplitSections Flag Bool -> f (Flag Bool)
f PackageConfig
s = (Flag Bool -> PackageConfig) -> f (Flag Bool) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag Bool
x -> PackageConfig
s{T.packageConfigSplitSections = x}) (Flag Bool -> f (Flag Bool)
f (PackageConfig -> Flag Bool
T.packageConfigSplitSections PackageConfig
s))
{-# INLINEABLE packageConfigSplitSections #-}
packageConfigSplitObjs :: Lens' PackageConfig (Flag Bool)
packageConfigSplitObjs :: Lens' PackageConfig (Flag Bool)
packageConfigSplitObjs Flag Bool -> f (Flag Bool)
f PackageConfig
s = (Flag Bool -> PackageConfig) -> f (Flag Bool) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag Bool
x -> PackageConfig
s{T.packageConfigSplitObjs = x}) (Flag Bool -> f (Flag Bool)
f (PackageConfig -> Flag Bool
T.packageConfigSplitObjs PackageConfig
s))
{-# INLINEABLE packageConfigSplitObjs #-}
packageConfigStripExes :: Lens' PackageConfig (Flag Bool)
packageConfigStripExes :: Lens' PackageConfig (Flag Bool)
packageConfigStripExes Flag Bool -> f (Flag Bool)
f PackageConfig
s = (Flag Bool -> PackageConfig) -> f (Flag Bool) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag Bool
x -> PackageConfig
s{T.packageConfigStripExes = x}) (Flag Bool -> f (Flag Bool)
f (PackageConfig -> Flag Bool
T.packageConfigStripExes PackageConfig
s))
{-# INLINEABLE packageConfigStripExes #-}
packageConfigStripLibs :: Lens' PackageConfig (Flag Bool)
packageConfigStripLibs :: Lens' PackageConfig (Flag Bool)
packageConfigStripLibs Flag Bool -> f (Flag Bool)
f PackageConfig
s = (Flag Bool -> PackageConfig) -> f (Flag Bool) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag Bool
x -> PackageConfig
s{T.packageConfigStripLibs = x}) (Flag Bool -> f (Flag Bool)
f (PackageConfig -> Flag Bool
T.packageConfigStripLibs PackageConfig
s))
{-# INLINEABLE packageConfigStripLibs #-}
packageConfigTests :: Lens' PackageConfig (Flag Bool)
packageConfigTests :: Lens' PackageConfig (Flag Bool)
packageConfigTests Flag Bool -> f (Flag Bool)
f PackageConfig
s = (Flag Bool -> PackageConfig) -> f (Flag Bool) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag Bool
x -> PackageConfig
s{T.packageConfigTests = x}) (Flag Bool -> f (Flag Bool)
f (PackageConfig -> Flag Bool
T.packageConfigTests PackageConfig
s))
{-# INLINEABLE packageConfigTests #-}
packageConfigBenchmarks :: Lens' PackageConfig (Flag Bool)
packageConfigBenchmarks :: Lens' PackageConfig (Flag Bool)
packageConfigBenchmarks Flag Bool -> f (Flag Bool)
f PackageConfig
s = (Flag Bool -> PackageConfig) -> f (Flag Bool) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag Bool
x -> PackageConfig
s{T.packageConfigBenchmarks = x}) (Flag Bool -> f (Flag Bool)
f (PackageConfig -> Flag Bool
T.packageConfigBenchmarks PackageConfig
s))
{-# INLINEABLE packageConfigBenchmarks #-}
packageConfigCoverage :: Lens' PackageConfig (Flag Bool)
packageConfigCoverage :: Lens' PackageConfig (Flag Bool)
packageConfigCoverage Flag Bool -> f (Flag Bool)
f PackageConfig
s = (Flag Bool -> PackageConfig) -> f (Flag Bool) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag Bool
x -> PackageConfig
s{T.packageConfigCoverage = x}) (Flag Bool -> f (Flag Bool)
f (PackageConfig -> Flag Bool
T.packageConfigCoverage PackageConfig
s))
{-# INLINEABLE packageConfigCoverage #-}
packageConfigRelocatable :: Lens' PackageConfig (Flag Bool)
packageConfigRelocatable :: Lens' PackageConfig (Flag Bool)
packageConfigRelocatable Flag Bool -> f (Flag Bool)
f PackageConfig
s = (Flag Bool -> PackageConfig) -> f (Flag Bool) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag Bool
x -> PackageConfig
s{T.packageConfigRelocatable = x}) (Flag Bool -> f (Flag Bool)
f (PackageConfig -> Flag Bool
T.packageConfigRelocatable PackageConfig
s))
{-# INLINEABLE packageConfigRelocatable #-}
packageConfigDebugInfo :: Lens' PackageConfig (Flag DebugInfoLevel)
packageConfigDebugInfo :: Lens' PackageConfig (Flag DebugInfoLevel)
packageConfigDebugInfo Flag DebugInfoLevel -> f (Flag DebugInfoLevel)
f PackageConfig
s = (Flag DebugInfoLevel -> PackageConfig)
-> f (Flag DebugInfoLevel) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag DebugInfoLevel
x -> PackageConfig
s{T.packageConfigDebugInfo = x}) (Flag DebugInfoLevel -> f (Flag DebugInfoLevel)
f (PackageConfig -> Flag DebugInfoLevel
T.packageConfigDebugInfo PackageConfig
s))
{-# INLINEABLE packageConfigDebugInfo #-}
packageConfigDumpBuildInfo :: Lens' PackageConfig (Flag DumpBuildInfo)
packageConfigDumpBuildInfo :: Lens' PackageConfig (Flag DumpBuildInfo)
packageConfigDumpBuildInfo Flag DumpBuildInfo -> f (Flag DumpBuildInfo)
f PackageConfig
s = (Flag DumpBuildInfo -> PackageConfig)
-> f (Flag DumpBuildInfo) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag DumpBuildInfo
x -> PackageConfig
s{T.packageConfigDumpBuildInfo = x}) (Flag DumpBuildInfo -> f (Flag DumpBuildInfo)
f (PackageConfig -> Flag DumpBuildInfo
T.packageConfigDumpBuildInfo PackageConfig
s))
{-# INLINEABLE packageConfigDumpBuildInfo #-}
packageConfigRunTests :: Lens' PackageConfig (Flag Bool)
packageConfigRunTests :: Lens' PackageConfig (Flag Bool)
packageConfigRunTests Flag Bool -> f (Flag Bool)
f PackageConfig
s = (Flag Bool -> PackageConfig) -> f (Flag Bool) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag Bool
x -> PackageConfig
s{T.packageConfigRunTests = x}) (Flag Bool -> f (Flag Bool)
f (PackageConfig -> Flag Bool
T.packageConfigRunTests PackageConfig
s))
{-# INLINEABLE packageConfigRunTests #-}
packageConfigDocumentation :: Lens' PackageConfig (Flag Bool)
packageConfigDocumentation :: Lens' PackageConfig (Flag Bool)
packageConfigDocumentation Flag Bool -> f (Flag Bool)
f PackageConfig
s = (Flag Bool -> PackageConfig) -> f (Flag Bool) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag Bool
x -> PackageConfig
s{T.packageConfigDocumentation = x}) (Flag Bool -> f (Flag Bool)
f (PackageConfig -> Flag Bool
T.packageConfigDocumentation PackageConfig
s))
{-# INLINEABLE packageConfigDocumentation #-}
packageConfigHaddockHoogle :: Lens' PackageConfig (Flag Bool)
packageConfigHaddockHoogle :: Lens' PackageConfig (Flag Bool)
packageConfigHaddockHoogle Flag Bool -> f (Flag Bool)
f PackageConfig
s = (Flag Bool -> PackageConfig) -> f (Flag Bool) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag Bool
x -> PackageConfig
s{T.packageConfigHaddockHoogle = x}) (Flag Bool -> f (Flag Bool)
f (PackageConfig -> Flag Bool
T.packageConfigHaddockHoogle PackageConfig
s))
{-# INLINEABLE packageConfigHaddockHoogle #-}
packageConfigHaddockHtml :: Lens' PackageConfig (Flag Bool)
packageConfigHaddockHtml :: Lens' PackageConfig (Flag Bool)
packageConfigHaddockHtml Flag Bool -> f (Flag Bool)
f PackageConfig
s = (Flag Bool -> PackageConfig) -> f (Flag Bool) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag Bool
x -> PackageConfig
s{T.packageConfigHaddockHtml = x}) (Flag Bool -> f (Flag Bool)
f (PackageConfig -> Flag Bool
T.packageConfigHaddockHtml PackageConfig
s))
{-# INLINEABLE packageConfigHaddockHtml #-}
packageConfigHaddockHtmlLocation :: Lens' PackageConfig (Flag String)
packageConfigHaddockHtmlLocation :: Lens' PackageConfig (Flag String)
packageConfigHaddockHtmlLocation Flag String -> f (Flag String)
f PackageConfig
s = (Flag String -> PackageConfig)
-> f (Flag String) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag String
x -> PackageConfig
s{T.packageConfigHaddockHtmlLocation = x}) (Flag String -> f (Flag String)
f (PackageConfig -> Flag String
T.packageConfigHaddockHtmlLocation PackageConfig
s))
{-# INLINEABLE packageConfigHaddockHtmlLocation #-}
packageConfigHaddockForeignLibs :: Lens' PackageConfig (Flag Bool)
packageConfigHaddockForeignLibs :: Lens' PackageConfig (Flag Bool)
packageConfigHaddockForeignLibs Flag Bool -> f (Flag Bool)
f PackageConfig
s = (Flag Bool -> PackageConfig) -> f (Flag Bool) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag Bool
x -> PackageConfig
s{T.packageConfigHaddockForeignLibs = x}) (Flag Bool -> f (Flag Bool)
f (PackageConfig -> Flag Bool
T.packageConfigHaddockForeignLibs PackageConfig
s))
{-# INLINEABLE packageConfigHaddockForeignLibs #-}
packageConfigHaddockExecutables :: Lens' PackageConfig (Flag Bool)
packageConfigHaddockExecutables :: Lens' PackageConfig (Flag Bool)
packageConfigHaddockExecutables Flag Bool -> f (Flag Bool)
f PackageConfig
s = (Flag Bool -> PackageConfig) -> f (Flag Bool) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag Bool
x -> PackageConfig
s{T.packageConfigHaddockExecutables = x}) (Flag Bool -> f (Flag Bool)
f (PackageConfig -> Flag Bool
T.packageConfigHaddockExecutables PackageConfig
s))
{-# INLINEABLE packageConfigHaddockExecutables #-}
packageConfigHaddockTestSuites :: Lens' PackageConfig (Flag Bool)
packageConfigHaddockTestSuites :: Lens' PackageConfig (Flag Bool)
packageConfigHaddockTestSuites Flag Bool -> f (Flag Bool)
f PackageConfig
s = (Flag Bool -> PackageConfig) -> f (Flag Bool) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag Bool
x -> PackageConfig
s{T.packageConfigHaddockTestSuites = x}) (Flag Bool -> f (Flag Bool)
f (PackageConfig -> Flag Bool
T.packageConfigHaddockTestSuites PackageConfig
s))
{-# INLINEABLE packageConfigHaddockTestSuites #-}
packageConfigHaddockBenchmarks :: Lens' PackageConfig (Flag Bool)
packageConfigHaddockBenchmarks :: Lens' PackageConfig (Flag Bool)
packageConfigHaddockBenchmarks Flag Bool -> f (Flag Bool)
f PackageConfig
s = (Flag Bool -> PackageConfig) -> f (Flag Bool) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag Bool
x -> PackageConfig
s{T.packageConfigHaddockBenchmarks = x}) (Flag Bool -> f (Flag Bool)
f (PackageConfig -> Flag Bool
T.packageConfigHaddockBenchmarks PackageConfig
s))
{-# INLINEABLE packageConfigHaddockBenchmarks #-}
packageConfigHaddockInternal :: Lens' PackageConfig (Flag Bool)
packageConfigHaddockInternal :: Lens' PackageConfig (Flag Bool)
packageConfigHaddockInternal Flag Bool -> f (Flag Bool)
f PackageConfig
s = (Flag Bool -> PackageConfig) -> f (Flag Bool) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag Bool
x -> PackageConfig
s{T.packageConfigHaddockInternal = x}) (Flag Bool -> f (Flag Bool)
f (PackageConfig -> Flag Bool
T.packageConfigHaddockInternal PackageConfig
s))
{-# INLINEABLE packageConfigHaddockInternal #-}
packageConfigHaddockCss :: Lens' PackageConfig (Flag FilePath)
packageConfigHaddockCss :: Lens' PackageConfig (Flag String)
packageConfigHaddockCss Flag String -> f (Flag String)
f PackageConfig
s = (Flag String -> PackageConfig)
-> f (Flag String) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag String
x -> PackageConfig
s{T.packageConfigHaddockCss = x}) (Flag String -> f (Flag String)
f (PackageConfig -> Flag String
T.packageConfigHaddockCss PackageConfig
s))
{-# INLINEABLE packageConfigHaddockCss #-}
packageConfigHaddockLinkedSource :: Lens' PackageConfig (Flag Bool)
packageConfigHaddockLinkedSource :: Lens' PackageConfig (Flag Bool)
packageConfigHaddockLinkedSource Flag Bool -> f (Flag Bool)
f PackageConfig
s = (Flag Bool -> PackageConfig) -> f (Flag Bool) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag Bool
x -> PackageConfig
s{T.packageConfigHaddockLinkedSource = x}) (Flag Bool -> f (Flag Bool)
f (PackageConfig -> Flag Bool
T.packageConfigHaddockLinkedSource PackageConfig
s))
{-# INLINEABLE packageConfigHaddockLinkedSource #-}
packageConfigHaddockQuickJump :: Lens' PackageConfig (Flag Bool)
packageConfigHaddockQuickJump :: Lens' PackageConfig (Flag Bool)
packageConfigHaddockQuickJump Flag Bool -> f (Flag Bool)
f PackageConfig
s = (Flag Bool -> PackageConfig) -> f (Flag Bool) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag Bool
x -> PackageConfig
s{T.packageConfigHaddockQuickJump = x}) (Flag Bool -> f (Flag Bool)
f (PackageConfig -> Flag Bool
T.packageConfigHaddockQuickJump PackageConfig
s))
{-# INLINEABLE packageConfigHaddockQuickJump #-}
packageConfigHaddockHscolourCss :: Lens' PackageConfig (Flag FilePath)
packageConfigHaddockHscolourCss :: Lens' PackageConfig (Flag String)
packageConfigHaddockHscolourCss Flag String -> f (Flag String)
f PackageConfig
s = (Flag String -> PackageConfig)
-> f (Flag String) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag String
x -> PackageConfig
s{T.packageConfigHaddockHscolourCss = x}) (Flag String -> f (Flag String)
f (PackageConfig -> Flag String
T.packageConfigHaddockHscolourCss PackageConfig
s))
{-# INLINEABLE packageConfigHaddockHscolourCss #-}
packageConfigHaddockContents :: Lens' PackageConfig (Flag PathTemplate)
packageConfigHaddockContents :: Lens' PackageConfig (Flag PathTemplate)
packageConfigHaddockContents Flag PathTemplate -> f (Flag PathTemplate)
f PackageConfig
s = (Flag PathTemplate -> PackageConfig)
-> f (Flag PathTemplate) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag PathTemplate
x -> PackageConfig
s{T.packageConfigHaddockContents = x}) (Flag PathTemplate -> f (Flag PathTemplate)
f (PackageConfig -> Flag PathTemplate
T.packageConfigHaddockContents PackageConfig
s))
{-# INLINEABLE packageConfigHaddockContents #-}
packageConfigHaddockIndex :: Lens' PackageConfig (Flag PathTemplate)
packageConfigHaddockIndex :: Lens' PackageConfig (Flag PathTemplate)
packageConfigHaddockIndex Flag PathTemplate -> f (Flag PathTemplate)
f PackageConfig
s = (Flag PathTemplate -> PackageConfig)
-> f (Flag PathTemplate) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag PathTemplate
x -> PackageConfig
s{T.packageConfigHaddockIndex = x}) (Flag PathTemplate -> f (Flag PathTemplate)
f (PackageConfig -> Flag PathTemplate
T.packageConfigHaddockIndex PackageConfig
s))
{-# INLINEABLE packageConfigHaddockIndex #-}
packageConfigHaddockBaseUrl :: Lens' PackageConfig (Flag String)
packageConfigHaddockBaseUrl :: Lens' PackageConfig (Flag String)
packageConfigHaddockBaseUrl Flag String -> f (Flag String)
f PackageConfig
s = (Flag String -> PackageConfig)
-> f (Flag String) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag String
x -> PackageConfig
s{T.packageConfigHaddockBaseUrl = x}) (Flag String -> f (Flag String)
f (PackageConfig -> Flag String
T.packageConfigHaddockBaseUrl PackageConfig
s))
{-# INLINEABLE packageConfigHaddockBaseUrl #-}
packageConfigHaddockResourcesDir :: Lens' PackageConfig (Flag String)
packageConfigHaddockResourcesDir :: Lens' PackageConfig (Flag String)
packageConfigHaddockResourcesDir Flag String -> f (Flag String)
f PackageConfig
s = (Flag String -> PackageConfig)
-> f (Flag String) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag String
x -> PackageConfig
s{T.packageConfigHaddockResourcesDir = x}) (Flag String -> f (Flag String)
f (PackageConfig -> Flag String
T.packageConfigHaddockResourcesDir PackageConfig
s))
{-# INLINEABLE packageConfigHaddockResourcesDir #-}
packageConfigHaddockOutputDir :: Lens' PackageConfig (Flag FilePath)
packageConfigHaddockOutputDir :: Lens' PackageConfig (Flag String)
packageConfigHaddockOutputDir Flag String -> f (Flag String)
f PackageConfig
s = (Flag String -> PackageConfig)
-> f (Flag String) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag String
x -> PackageConfig
s{T.packageConfigHaddockOutputDir = x}) (Flag String -> f (Flag String)
f (PackageConfig -> Flag String
T.packageConfigHaddockOutputDir PackageConfig
s))
{-# INLINEABLE packageConfigHaddockOutputDir #-}
packageConfigHaddockUseUnicode :: Lens' PackageConfig (Flag Bool)
packageConfigHaddockUseUnicode :: Lens' PackageConfig (Flag Bool)
packageConfigHaddockUseUnicode Flag Bool -> f (Flag Bool)
f PackageConfig
s = (Flag Bool -> PackageConfig) -> f (Flag Bool) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag Bool
x -> PackageConfig
s{T.packageConfigHaddockUseUnicode = x}) (Flag Bool -> f (Flag Bool)
f (PackageConfig -> Flag Bool
T.packageConfigHaddockUseUnicode PackageConfig
s))
{-# INLINEABLE packageConfigHaddockUseUnicode #-}
packageConfigHaddockForHackage :: Lens' PackageConfig (Flag HaddockTarget)
packageConfigHaddockForHackage :: Lens' PackageConfig (Flag HaddockTarget)
packageConfigHaddockForHackage Flag HaddockTarget -> f (Flag HaddockTarget)
f PackageConfig
s = (Flag HaddockTarget -> PackageConfig)
-> f (Flag HaddockTarget) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag HaddockTarget
x -> PackageConfig
s{T.packageConfigHaddockForHackage = x}) (Flag HaddockTarget -> f (Flag HaddockTarget)
f (PackageConfig -> Flag HaddockTarget
T.packageConfigHaddockForHackage PackageConfig
s))
{-# INLINEABLE packageConfigHaddockForHackage #-}
packageConfigTestHumanLog :: Lens' PackageConfig (Flag PathTemplate)
packageConfigTestHumanLog :: Lens' PackageConfig (Flag PathTemplate)
packageConfigTestHumanLog Flag PathTemplate -> f (Flag PathTemplate)
f PackageConfig
s = (Flag PathTemplate -> PackageConfig)
-> f (Flag PathTemplate) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag PathTemplate
x -> PackageConfig
s{T.packageConfigTestHumanLog = x}) (Flag PathTemplate -> f (Flag PathTemplate)
f (PackageConfig -> Flag PathTemplate
T.packageConfigTestHumanLog PackageConfig
s))
{-# INLINEABLE packageConfigTestHumanLog #-}
packageConfigTestMachineLog :: Lens' PackageConfig (Flag PathTemplate)
packageConfigTestMachineLog :: Lens' PackageConfig (Flag PathTemplate)
packageConfigTestMachineLog Flag PathTemplate -> f (Flag PathTemplate)
f PackageConfig
s = (Flag PathTemplate -> PackageConfig)
-> f (Flag PathTemplate) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag PathTemplate
x -> PackageConfig
s{T.packageConfigTestMachineLog = x}) (Flag PathTemplate -> f (Flag PathTemplate)
f (PackageConfig -> Flag PathTemplate
T.packageConfigTestMachineLog PackageConfig
s))
{-# INLINEABLE packageConfigTestMachineLog #-}
packageConfigTestShowDetails :: Lens' PackageConfig (Flag TestShowDetails)
packageConfigTestShowDetails :: Lens' PackageConfig (Flag TestShowDetails)
packageConfigTestShowDetails Flag TestShowDetails -> f (Flag TestShowDetails)
f PackageConfig
s = (Flag TestShowDetails -> PackageConfig)
-> f (Flag TestShowDetails) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag TestShowDetails
x -> PackageConfig
s{T.packageConfigTestShowDetails = x}) (Flag TestShowDetails -> f (Flag TestShowDetails)
f (PackageConfig -> Flag TestShowDetails
T.packageConfigTestShowDetails PackageConfig
s))
{-# INLINEABLE packageConfigTestShowDetails #-}
packageConfigTestKeepTix :: Lens' PackageConfig (Flag Bool)
packageConfigTestKeepTix :: Lens' PackageConfig (Flag Bool)
packageConfigTestKeepTix Flag Bool -> f (Flag Bool)
f PackageConfig
s = (Flag Bool -> PackageConfig) -> f (Flag Bool) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag Bool
x -> PackageConfig
s{T.packageConfigTestKeepTix = x}) (Flag Bool -> f (Flag Bool)
f (PackageConfig -> Flag Bool
T.packageConfigTestKeepTix PackageConfig
s))
{-# INLINEABLE packageConfigTestKeepTix #-}
packageConfigTestWrapper :: Lens' PackageConfig (Flag FilePath)
packageConfigTestWrapper :: Lens' PackageConfig (Flag String)
packageConfigTestWrapper Flag String -> f (Flag String)
f PackageConfig
s = (Flag String -> PackageConfig)
-> f (Flag String) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag String
x -> PackageConfig
s{T.packageConfigTestWrapper = x}) (Flag String -> f (Flag String)
f (PackageConfig -> Flag String
T.packageConfigTestWrapper PackageConfig
s))
{-# INLINEABLE packageConfigTestWrapper #-}
packageConfigTestFailWhenNoTestSuites :: Lens' PackageConfig (Flag Bool)
packageConfigTestFailWhenNoTestSuites :: Lens' PackageConfig (Flag Bool)
packageConfigTestFailWhenNoTestSuites Flag Bool -> f (Flag Bool)
f PackageConfig
s = (Flag Bool -> PackageConfig) -> f (Flag Bool) -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\Flag Bool
x -> PackageConfig
s{T.packageConfigTestFailWhenNoTestSuites = x}) (Flag Bool -> f (Flag Bool)
f (PackageConfig -> Flag Bool
T.packageConfigTestFailWhenNoTestSuites PackageConfig
s))
{-# INLINEABLE packageConfigTestFailWhenNoTestSuites #-}
packageConfigTestTestOptions :: Lens' PackageConfig [PathTemplate]
packageConfigTestTestOptions :: Lens' PackageConfig [PathTemplate]
packageConfigTestTestOptions [PathTemplate] -> f [PathTemplate]
f PackageConfig
s = ([PathTemplate] -> PackageConfig)
-> f [PathTemplate] -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\[PathTemplate]
x -> PackageConfig
s{T.packageConfigTestTestOptions = x}) ([PathTemplate] -> f [PathTemplate]
f (PackageConfig -> [PathTemplate]
T.packageConfigTestTestOptions PackageConfig
s))
{-# INLINEABLE packageConfigTestTestOptions #-}
packageConfigBenchmarkOptions :: Lens' PackageConfig [PathTemplate]
packageConfigBenchmarkOptions :: Lens' PackageConfig [PathTemplate]
packageConfigBenchmarkOptions [PathTemplate] -> f [PathTemplate]
f PackageConfig
s = ([PathTemplate] -> PackageConfig)
-> f [PathTemplate] -> f PackageConfig
forall a b. (a -> b) -> f a -> f b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (\[PathTemplate]
x -> PackageConfig
s{T.packageConfigBenchmarkOptions = x}) ([PathTemplate] -> f [PathTemplate]
f (PackageConfig -> [PathTemplate]
T.packageConfigBenchmarkOptions PackageConfig
s))
{-# INLINEABLE packageConfigBenchmarkOptions #-}