diff options
Diffstat (limited to 'skip/ghc/0005-buildpath-abi-stability.patch')
-rw-r--r-- | skip/ghc/0005-buildpath-abi-stability.patch | 25 |
1 files changed, 25 insertions, 0 deletions
diff --git a/skip/ghc/0005-buildpath-abi-stability.patch b/skip/ghc/0005-buildpath-abi-stability.patch new file mode 100644 index 0000000..377eb41 --- /dev/null +++ b/skip/ghc/0005-buildpath-abi-stability.patch @@ -0,0 +1,25 @@ +Forwarded to https://gitlab.haskell.org/ghc/ghc/-/issues/10424 + +Index: ghc/compiler/GHC/Iface/Utils.hs +=================================================================== +--- a/compiler/GHC/Iface/Recomp.hs ++++ b/compiler/GHC/Iface/Recomp.hs +@@ -556,7 +556,7 @@ + iface_hash <- computeFingerprint putNameLiterally + (mod_hash, + ann_fn (mkVarOcc "module"), -- See mkIfaceAnnCache +- mi_usages iface0, ++ usages, + sorted_deps, + mi_hpc iface0) + +@@ -589,6 +589,9 @@ + (non_orph_fis, orph_fis) = mkOrphMap ifFamInstOrph (mi_fam_insts iface0) + fix_fn = mi_fix_fn iface0 + ann_fn = mkIfaceAnnCache (mi_anns iface0) ++ -- Do not allow filenames to affect the interface ++ usages = [ case u of UsageFile _ fp -> UsageFile "" fp; _ -> u | u <- mi_usages iface0 ] ++ + + getOrphanHashes :: HscEnv -> [Module] -> IO [Fingerprint] + getOrphanHashes hsc_env mods = do |