summaryrefslogtreecommitdiff
path: root/hadrian/src/Rules/Rts.hs
diff options
context:
space:
mode:
Diffstat (limited to 'hadrian/src/Rules/Rts.hs')
-rw-r--r--hadrian/src/Rules/Rts.hs3
1 files changed, 3 insertions, 0 deletions
diff --git a/hadrian/src/Rules/Rts.hs b/hadrian/src/Rules/Rts.hs
index a6cd0f15d2..59a337801f 100644
--- a/hadrian/src/Rules/Rts.hs
+++ b/hadrian/src/Rules/Rts.hs
@@ -28,6 +28,7 @@ rtsRules = priority 3 $ do
let buildPath = root -/- buildDir (rtsContext stage)
-- Header files
+ -- See Note [Packaging libffi headers] in GHC.Driver.CodeOutput.
forM_ libffiHeaderFiles $ \header ->
buildPath -/- "include" -/- header %> copyLibffiHeader stage
@@ -46,6 +47,8 @@ withLibffi stage action = needLibffi stage
-- | Copy a header files wither from the system libffi or from the libffi
-- build dir to the rts build dir.
+--
+-- See Note [Packaging libffi headers] in GHC.Driver.CodeOutput.
copyLibffiHeader :: Stage -> FilePath -> Action ()
copyLibffiHeader stage header = do
useSystemFfi <- flag UseSystemFfi