Commit c6453def authored by Simon Marlow's avatar Simon Marlow
Browse files

SRT labels don't need to be globally visible

Saves space in the symbol table and speeds up linking
parent 1a50b338
......@@ -528,6 +528,8 @@ externallyVisibleCLabel (PlainModuleInitLabel _)= True
externallyVisibleCLabel ModuleRegdLabel = False
externallyVisibleCLabel (RtsLabel _) = True
externallyVisibleCLabel (ForeignLabel _ _ _) = True
externallyVisibleCLabel (IdLabel name SRT) = False
-- SRTs don't need to be external
externallyVisibleCLabel (IdLabel name _) = isExternalName name
externallyVisibleCLabel (CC_Label _) = True
externallyVisibleCLabel (CCS_Label _) = True
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment