diff options
Diffstat (limited to 'compiler/GHC/ByteCode/Linker.hs')
| -rw-r--r-- | compiler/GHC/ByteCode/Linker.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/GHC/ByteCode/Linker.hs b/compiler/GHC/ByteCode/Linker.hs index 1fab779619..03c03fbf2b 100644 --- a/compiler/GHC/ByteCode/Linker.hs +++ b/compiler/GHC/ByteCode/Linker.hs @@ -169,7 +169,7 @@ nameToCLabel n suffix = mkFastString label occPart = encodeZ (occNameFS (nameOccName n)) label = concat - [ if pkgKey == mainUnitId then "" else packagePart ++ "_" + [ if pkgKey == mainUnit then "" else packagePart ++ "_" , modulePart , '_':occPart , '_':suffix |