Commit 81b5698d authored by Simon Marlow's avatar Simon Marlow

Replace a checking `is_elem` with a plain `elem`

This one complains sometimes, but there's no good way to improve it.
parent 24c13c13
......@@ -155,8 +155,7 @@ cgRhsClosure bndr cc bndr_info fvs upd_flag args body = do
-- Node points to it...
let
name = idName bndr
is_elem = isIn "cgRhsClosure"
bndr_is_a_fv = bndr `is_elem` fvs
bndr_is_a_fv = bndr `elem` fvs
reduced_fvs | bndr_is_a_fv = fvs `minusList` [bndr]
| otherwise = fvs
......
Markdown is supported
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