]> TLD Linux GIT Repositories - packages/ghc.git/blob - buildpath-abi-stability.patch
- updated source5
[packages/ghc.git] / buildpath-abi-stability.patch
1 Forwarded to https://ghc.haskell.org/trac/ghc/ticket/10424
2
3 Index: ghc-8.8.1+dfsg1/compiler/iface/MkIface.hs
4 ===================================================================
5 --- ghc-8.8.1+dfsg1.orig/compiler/iface/MkIface.hs
6 +++ ghc-8.8.1+dfsg1/compiler/iface/MkIface.hs
7 @@ -713,7 +713,7 @@
8     iface_hash <- computeFingerprint putNameLiterally
9                        (mod_hash,
10                         ann_fn (mkVarOcc "module"),  -- See mkIfaceAnnCache
11 -                       mi_usages iface0,
12 +                       usages,
13                         sorted_deps,
14                         mi_hpc iface0)
15  
16 @@ -748,6 +748,9 @@
17      (non_orph_rules, orph_rules) = mkOrphMap ifRuleOrph    (mi_rules iface0)
18      (non_orph_fis,   orph_fis)   = mkOrphMap ifFamInstOrph (mi_fam_insts iface0)
19      ann_fn = mkIfaceAnnCache (mi_anns iface0)
20 +    -- Do not allow filenames to affect the interface
21 +    usages = [ case u of UsageFile _ fp -> UsageFile "" fp; _ -> u | u <- mi_usages iface0 ]
22 +
23  
24  -- | Retrieve the orphan hashes 'mi_orphan_hash' for a list of modules
25  -- (in particular, the orphan modules which are transitively imported by the