From 33a999bd52187d2be0955a60df377f96f49cf57f Mon Sep 17 00:00:00 2001 From: Debian Haskell Group Date: Mon, 16 Sep 2024 00:17:25 +0300 Subject: [PATCH] buildpath-abi-stability Forwarded to https://ghc.haskell.org/trac/ghc/ticket/10424 Forwarded to https://ghc.haskell.org/trac/ghc/ticket/10424 Gbp-Pq: Name buildpath-abi-stability.patch --- compiler/GHC/Iface/Recomp.hs | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/compiler/GHC/Iface/Recomp.hs b/compiler/GHC/Iface/Recomp.hs index 0f8748e5..89918f44 100644 --- a/compiler/GHC/Iface/Recomp.hs +++ b/compiler/GHC/Iface/Recomp.hs @@ -1247,7 +1247,7 @@ addFingerprints hsc_env iface0 (mod_hash, mi_src_hash iface0, ann_fn (mkVarOccFS (fsLit "module")), -- See mkIfaceAnnCache - mi_usages iface0, + usages, sorted_deps, mi_hpc iface0) @@ -1282,6 +1282,8 @@ addFingerprints hsc_env iface0 (non_orph_rules, orph_rules) = mkOrphMap ifRuleOrph (mi_rules iface0) (non_orph_fis, orph_fis) = mkOrphMap ifFamInstOrph (mi_fam_insts iface0) ann_fn = mkIfaceAnnCache (mi_anns iface0) + -- Do not allow filenames to affect the interface + usages = [ case u of UsageFile _ fp fl -> UsageFile "" fp fl; _ -> u | u <- mi_usages iface0 ] -- | Retrieve the orphan hashes 'mi_orphan_hash' for a list of modules -- (in particular, the orphan modules which are transitively imported by the -- 2.30.2