From 2cc26fd794404c9faf118ff2c8260e58ada22c7c Mon Sep 17 00:00:00 2001
From: Ben Gamari <ben@smart-cactus.org>
Date: Fri, 25 Feb 2022 11:16:39 -0500
Subject: [PATCH] Revert "simplCore: Correctly extend in-scope set in rule
matching"
This reverts commit 8bbdba450980c2b0054e19ae737eeaa3cfdb452d.
---
compiler/GHC/Core/Rules.hs | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/compiler/GHC/Core/Rules.hs b/compiler/GHC/Core/Rules.hs
index 96f9bece4c85..ccfbbe6a7819 100644
--- a/compiler/GHC/Core/Rules.hs
+++ b/compiler/GHC/Core/Rules.hs
@@ -955,7 +955,7 @@ match renv subst e1 (Let bind e2) mco
| otherwise
= Nothing
where
- (flt_subst', bind') = substBind (rv_fltR renv `extendInScopeList` rs_bndrs subst) bind
+ (flt_subst', bind') = substBind (rv_fltR renv) bind
new_bndrs = bindersOf bind'
------------------------ Lambdas ---------------------
--
GitLab