summaryrefslogtreecommitdiff
path: root/compiler/specialise
diff options
context:
space:
mode:
authorSimon Peyton Jones <simonpj@microsoft.com>2015-10-06 09:53:07 +0100
committerSimon Peyton Jones <simonpj@microsoft.com>2015-10-06 09:53:42 +0100
commitca816c6db6c9cbce4cf1670a791dd541c3edf771 (patch)
tree786d524754eb41cf29e6133c652e5ba495197a11 /compiler/specialise
parent0e169a8b2b672ca95aad72511865c0b3fca458d3 (diff)
downloadhaskell-ca816c6db6c9cbce4cf1670a791dd541c3edf771.tar.gz
Remove dead code: ruleLhsOrphNames
Diffstat (limited to 'compiler/specialise')
-rw-r--r--compiler/specialise/Rules.hs1
1 files changed, 0 insertions, 1 deletions
diff --git a/compiler/specialise/Rules.hs b/compiler/specialise/Rules.hs
index dd48832864..d6a56d6fe4 100644
--- a/compiler/specialise/Rules.hs
+++ b/compiler/specialise/Rules.hs
@@ -180,7 +180,6 @@ mkRule this_mod is_auto is_local name act fn bndrs args rhs
-- A rule is an orphan only if none of the variables
-- mentioned on its left-hand side are locally defined
lhs_names = nameSetElems (extendNameSet (exprsOrphNames args) fn)
- -- TODO: copied from ruleLhsOrphNames
-- Since rules get eventually attached to one of the free names
-- from the definition when compiling the ABI hash, we should make