Distribution.ArchHs.Core

The core functions of arch-hs.

Documentation

getDependencies

Arguments

:: (HasCallStack, Members [KnownGHCVersion, HackageEnv, FlagAssignmentsEnv, WithMyErr, DependencyRecord, State (Set PackageName), Trace] r)

=> [UnqualComponentName]

Skipped

-> Maybe PackageName

Parent

-> PackageName

Target

-> Sem r (AdjacencyMap (Set DependencyType) PackageName, Set PackageName, Map PackageName [SystemDependency])

Get dependencies of a package recursively. All version constraints will be discarded, and only packages depended by executables, libraries, and test suits will be collected.

cabalToPkgBuild :: Members [HackageEnv, FlagAssignmentsEnv, WithMyErr] r => SolvedPackage -> Bool -> [ArchLinuxName] -> Sem r PkgBuild

Generate PkgBuild for a SolvedPackage.

evalConditionTree :: (HasCallStack, Semigroup k, HasBuildInfo k, Members [KnownGHCVersion, FlagAssignmentsEnv, Trace] r) => GenericPackageDescription -> CondTree ConfVar [Dependency] k -> Sem r BuildInfo

Simplify the condition tree from GenericPackageDescription with given flag assignments and archlinux system assumption.

subsumeGHCVersion :: Members [ExtraEnv, WithMyErr] r => InterpreterFor KnownGHCVersion r

Get the ghc version in ExtraDB

Helper functions

collectLibDeps :: (Members [KnownGHCVersion, FlagAssignmentsEnv, DependencyRecord, Trace] r, Show a, Monoid a) => ([(PackageName, VersionRange)] -> a) -> GenericPackageDescription -> Sem r (a, a, [SystemDependency])

collectExeDeps :: (HasCallStack, Members [KnownGHCVersion, FlagAssignmentsEnv, DependencyRecord, Trace] r, Show a) => ([(UnqualComponentName, [(PackageName, VersionRange)])] -> a) -> GenericPackageDescription -> [UnqualComponentName] -> Sem r (a, a, [SystemDependency])

collectTestDeps :: (HasCallStack, Members [KnownGHCVersion, FlagAssignmentsEnv, DependencyRecord, Trace] r, Show a) => ([(UnqualComponentName, [(PackageName, VersionRange)])] -> a) -> GenericPackageDescription -> [UnqualComponentName] -> Sem r (a, a, [SystemDependency])

collectSubLibDeps :: (HasCallStack, Members [KnownGHCVersion, FlagAssignmentsEnv, DependencyRecord, Trace] r, Show a) => ([(UnqualComponentName, [(PackageName, VersionRange)])] -> a) -> GenericPackageDescription -> [UnqualComponentName] -> Sem r (a, a, [SystemDependency])

collectSetupDeps :: (Member Trace r, Show a, Monoid a) => ([(PackageName, VersionRange)] -> a) -> GenericPackageDescription -> Sem r a