GHC.Driver.Pipeline

Run a series of compilation steps in a pipeline, for a

oneShot :: HscEnv -> StopPhase -> [(String, Maybe Phase)] -> IO ()

compileFile :: HscEnv -> StopPhase -> (FilePath, Maybe Phase) -> IO (Maybe FilePath)

Interfaces for the compilation manager (interpreted/batch-mode)

preprocess

Arguments

:: HscEnv

-> FilePath

input filename

-> Maybe InputFileBuffer

optional buffer to use instead of reading the input file

-> Maybe Phase

starting phase

-> IO (Either DriverMessages (DynFlags, FilePath))

Just preprocess a file, put the result in a temp. file (used by the compilation manager during the summary phase).

We return the augmented DynFlags, because they contain the result of slurping in the OPTIONS pragmas

compileOne

Arguments

:: HscEnv

-> ModSummary

summary for module being compiled

-> Int

module N ...

-> Int

... of M

-> Maybe ModIface

old interface, if we have one

-> Maybe Linkable

old linkable, if we have one

-> IO HomeModInfo

the complete HomeModInfo, if successful

Compile

Compile a single module, under the control of the compilation manager.

This is the interface between the compilation manager and the compiler proper (hsc), where we deal with tedious details like reading the OPTIONS pragma from the source file, converting the C or assembly that GHC produces into an object file, and compiling FFI stub files.

NB. No old interface can also mean that the source has changed.

compileOne'

Arguments

:: Maybe Messager

-> HscEnv

-> ModSummary

summary for module being compiled

-> Int

module N ...

-> Int

... of M

-> Maybe ModIface

old interface, if we have one

-> Maybe Linkable

old linkable, if we have one

-> IO HomeModInfo

the complete HomeModInfo, if successful

compileForeign :: HscEnv -> ForeignSrcLang -> FilePath -> IO FilePath

compileEmptyStub :: DynFlags -> HscEnv -> FilePath -> ModLocation -> ModuleName -> IO ()

Linking

link

Arguments

:: GhcLink

interactive or batch

-> Logger

Logger

-> TmpFs

-> Hooks

-> DynFlags

dynamic flags

-> UnitEnv

unit environment

-> Bool

attempt linking in batch mode?

-> Maybe (RecompileRequired -> IO ())

-> HomePackageTable

what to link

-> IO SuccessFlag

linkingNeeded :: Logger -> DynFlags -> UnitEnv -> Bool -> [Linkable] -> [UnitId] -> IO RecompileRequired

checkLinkInfo :: Logger -> DynFlags -> UnitEnv -> [UnitId] -> FilePath -> IO Bool

PipeEnv

data PipeEnv

Constructors

PipeEnv

Fields

• stop_phase :: StopPhase

  Stop just after this phase

• src_filename :: String

  basename of original input source

• src_basename :: String

  basename of original input source

• src_suffix :: String

  its extension

• start_phase :: Phase
• output_spec :: PipelineOutput

  says where to put the pipeline output

mkPipeEnv :: StopPhase -> FilePath -> Maybe Phase -> PipelineOutput -> PipeEnv

phaseOutputFilenameNew

Arguments

:: Phase

The next phase

-> PipeEnv

-> HscEnv

-> Maybe ModLocation

A ModLocation, if we are compiling a Haskell source file

-> IO FilePath

Running individual phases

data TPhase res where

Constructors

T_Unlit :: PipeEnv -> HscEnv -> FilePath -> TPhase [Char]

T_FileArgs :: HscEnv -> FilePath -> TPhase (DynFlags, Messages PsMessage, [Warn])

T_Cpp :: PipeEnv -> HscEnv -> FilePath -> TPhase [Char]

T_HsPp :: PipeEnv -> HscEnv -> FilePath -> FilePath -> TPhase [Char]

T_HscRecomp :: PipeEnv -> HscEnv -> FilePath -> HscSource -> TPhase (HscEnv, ModSummary, HscRecompStatus)

T_Hsc :: HscEnv -> ModSummary -> TPhase (FrontendResult, Messages GhcMessage)

T_HscPostTc :: HscEnv -> ModSummary -> FrontendResult -> Messages GhcMessage -> Maybe Fingerprint -> TPhase HscBackendAction

T_HscBackend :: PipeEnv -> HscEnv -> ModuleName -> HscSource -> ModLocation -> HscBackendAction -> TPhase ([FilePath], ModIface, Maybe Linkable, FilePath)

T_CmmCpp :: PipeEnv -> HscEnv -> FilePath -> TPhase [Char]

T_Cmm :: PipeEnv -> HscEnv -> FilePath -> TPhase ([FilePath], FilePath)

T_Cc :: Phase -> PipeEnv -> HscEnv -> FilePath -> TPhase [Char]

T_As :: Bool -> PipeEnv -> HscEnv -> Maybe ModLocation -> FilePath -> TPhase [Char]

T_LlvmOpt :: PipeEnv -> HscEnv -> FilePath -> TPhase [Char]

T_LlvmLlc :: PipeEnv -> HscEnv -> FilePath -> TPhase [Char]

T_LlvmMangle :: PipeEnv -> HscEnv -> FilePath -> TPhase [Char]

T_MergeForeign :: PipeEnv -> HscEnv -> FilePath -> [FilePath] -> TPhase [Char]

Instances

MonadUse TPhase HookedUse

Defined in GHC.Driver.Pipeline.Execute

Methods

use :: TPhase a -> HookedUse a

runPhase :: TPhase out -> IO out

Default interpretation of each phase, in terms of IO.

hscPostBackendPhase :: HscSource -> Backend -> Phase

What phase to run after one of the backend code generators has run

Constructing Pipelines

type TPipelineClass (f :: Type -> Type) (m :: Type -> Type) = (Functor m, MonadIO m, Applicative m, Monad m, MonadUse f m)

class MonadUse (f :: Type -> Type) (m :: Type -> Type) where

Lift a f action into an m action.

Methods

use :: f a -> m a

Instances

MonadUse TPhase HookedUse

Defined in GHC.Driver.Pipeline.Execute

Methods

use :: TPhase a -> HookedUse a

preprocessPipeline :: P m => PipeEnv -> HscEnv -> FilePath -> m (DynFlags, FilePath)

The preprocessor pipeline

fullPipeline :: P m => PipeEnv -> HscEnv -> FilePath -> HscSource -> m (ModIface, Maybe Linkable)

The complete compilation pipeline, from start to finish

hscPipeline :: P m => PipeEnv -> (HscEnv, ModSummary, HscRecompStatus) -> m (ModIface, Maybe Linkable)

Everything after preprocess

hscBackendPipeline :: P m => PipeEnv -> HscEnv -> ModSummary -> HscBackendAction -> m (ModIface, Maybe Linkable)

hscPostBackendPipeline :: P m => PipeEnv -> HscEnv -> HscSource -> Backend -> Maybe ModLocation -> FilePath -> m (Maybe FilePath)

hscGenBackendPipeline :: P m => PipeEnv -> HscEnv -> ModSummary -> HscBackendAction -> m (ModIface, Maybe Linkable)

asPipeline :: P m => Bool -> PipeEnv -> HscEnv -> Maybe ModLocation -> FilePath -> m (Maybe ObjFile)

viaCPipeline :: P m => Phase -> PipeEnv -> HscEnv -> Maybe ModLocation -> FilePath -> m (Maybe FilePath)

cmmCppPipeline :: P m => PipeEnv -> HscEnv -> FilePath -> m FilePath

cmmPipeline :: P m => PipeEnv -> HscEnv -> FilePath -> m FilePath

llvmPipeline :: P m => PipeEnv -> HscEnv -> Maybe ModLocation -> FilePath -> m (Maybe FilePath)

llvmLlcPipeline :: P m => PipeEnv -> HscEnv -> Maybe ModLocation -> FilePath -> m (Maybe FilePath)

llvmManglePipeline :: P m => PipeEnv -> HscEnv -> Maybe ModLocation -> FilePath -> m (Maybe FilePath)

pipelineStart :: P m => PipeEnv -> HscEnv -> FilePath -> Maybe Phase -> m (Maybe FilePath)

Default method of running a pipeline

runPipeline :: Hooks -> HookedUse a -> IO a

The default mechanism to run a pipeline, see Note [The Pipeline Monad]