X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compiler%2FcoreSyn%2FCoreUtils.lhs;h=2599f4abef847c2af0980ed9bf1e3c668a5dfc47;hp=c8d6611d8c1f09d07f581942869fcbacdfe9a888;hb=8d6bc9bf51829ea04da5f599b84114ef220f0a19;hpb=35fc429931738f31c60e8a4bb85ef86dd7ce169e

diff --git a/compiler/coreSyn/CoreUtils.lhs b/compiler/coreSyn/CoreUtils.lhs
index c8d6611..2599f4a 100644
--- a/compiler/coreSyn/CoreUtils.lhs
+++ b/compiler/coreSyn/CoreUtils.lhs
@@ -1550,9 +1550,6 @@ rhsIsStatic :: PackageId -> CoreExpr -> Bool
 --	   dynamic
 -- 
 --    c) don't look through unfolding of f in (f x).
---
--- When opt_RuntimeTypes is on, we keep type lambdas and treat
--- them as making the RHS re-entrant (non-updatable).
 
 rhsIsStatic _this_pkg rhs = is_static False rhs
   where