summaryrefslogtreecommitdiff
path: root/compiler/cmm/CLabel.hs
diff options
context:
space:
mode:
authorBen Gamari <bgamari.foss@gmail.com>2016-12-16 11:59:26 -0500
committerBen Gamari <ben@smart-cactus.org>2016-12-16 11:59:28 -0500
commitc889df86d7bc9eb4cd53e38c81feecaf5f932678 (patch)
tree553aa08a25a587ad4d900630d1f8696825f7e2db /compiler/cmm/CLabel.hs
parent13c1fc4dfc925afa328a6be9db191b11bf96d4a0 (diff)
downloadhaskell-c889df86d7bc9eb4cd53e38c81feecaf5f932678.tar.gz
Packages: Kill unused UnitId argument to isDllName
Test Plan: Validate Reviewers: austin, simonmar Subscribers: thomie, ezyang Differential Revision: https://phabricator.haskell.org/D2866
Diffstat (limited to 'compiler/cmm/CLabel.hs')
-rw-r--r--compiler/cmm/CLabel.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/cmm/CLabel.hs b/compiler/cmm/CLabel.hs
index 3fd081c439..811d8e908b 100644
--- a/compiler/cmm/CLabel.hs
+++ b/compiler/cmm/CLabel.hs
@@ -952,7 +952,7 @@ labelDynamic dflags this_pkg this_mod lbl =
-- is the RTS in a DLL or not?
RtsLabel _ -> (WayDyn `elem` ways dflags) && (this_pkg /= rtsUnitId)
- IdLabel n _ _ -> isDllName dflags this_pkg this_mod n
+ IdLabel n _ _ -> isDllName dflags this_mod n
-- When compiling in the "dyn" way, each package is to be linked into
-- its own shared library.