From 70cfef77ff00fbd4a57f733045e62ce0a7ba1307 Mon Sep 17 00:00:00 2001
From: simonpj <unknown>
Date: Wed, 10 Aug 2005 11:09:07 +0000
Subject: [project @ 2005-08-10 11:09:05 by simonpj] Rename exprIsValue to
 exprIsHNF, which is more accurate

---
 ghc/compiler/coreSyn/CoreSyn.lhs | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

(limited to 'ghc/compiler/coreSyn/CoreSyn.lhs')

diff --git a/ghc/compiler/coreSyn/CoreSyn.lhs b/ghc/compiler/coreSyn/CoreSyn.lhs
index 2f6efd4127..201d866834 100644
--- a/ghc/compiler/coreSyn/CoreSyn.lhs
+++ b/ghc/compiler/coreSyn/CoreSyn.lhs
@@ -55,7 +55,6 @@ import OccName		( OccName )
 import Literal	        ( Literal, mkMachInt )
 import DataCon		( DataCon, dataConWorkId, dataConTag )
 import BasicTypes	( Activation )
-import VarSet
 import FastString
 import Outputable
 \end{code}
@@ -254,7 +253,7 @@ data Unfolding
   | CoreUnfolding			-- An unfolding with redundant cached information
 		CoreExpr		-- Template; binder-info is correct
 		Bool			-- True <=> top level binding
-		Bool			-- exprIsValue template (cached); it is ok to discard a `seq` on
+		Bool			-- exprIsHNF template (cached); it is ok to discard a `seq` on
 					--	this variable
 		Bool			-- True <=> doesn't waste (much) work to expand inside an inlining
 					-- 	Basically it's exprIsCheap
-- 
cgit v1.2.1