From da423ca2f62cc42f925cce0c489dd348d94c7d2e Mon Sep 17 00:00:00 2001
From: sof <unknown>
Date: Mon, 26 May 1997 03:30:57 +0000
Subject: [PATCH] [project @ 1997-05-26 03:30:57 by sof] Unfold lexeme now
 takes Bool indicating whether INLINE pragma annotation was
 used

---
 ghc/compiler/rename/ParseIface.y |    3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/ghc/compiler/rename/ParseIface.y b/ghc/compiler/rename/ParseIface.y
index 2e58b1f..ce0739f 100644
--- a/ghc/compiler/rename/ParseIface.y
+++ b/ghc/compiler/rename/ParseIface.y
@@ -12,6 +12,7 @@ import HsDecls		( HsIdInfo(..) )
 import HsTypes		( mkHsForAllTy )
 import HsCore
 import Literal
+import BasicTypes	( Fixity(..), FixityDirection(..), NewOrData(..), Version(..) )
 import HsPragmas	( noGenPragmas, noDataPragmas, noClassPragmas, noClassOpPragmas, noInstancePragmas )
 import IdInfo		( exactArity, mkStrictnessInfo, mkBottomStrictnessInfo,
 			  ArgUsageInfo, FBTypeInfo, ArityInfo, StrictnessInfo
@@ -92,7 +93,7 @@ parseIface ls = parseIToks (lexIface ls)
 	TYPE_PART       { ITtysig $$ }
 	ARITY_PART	{ ITarity }
 	STRICT_PART	{ ITstrict }
-	UNFOLD_PART	{ ITunfold }
+	UNFOLD_PART	{ ITunfold $$ }
 	DEMAND		{ ITdemand $$ }
 	BOTTOM		{ ITbottom }
 	LAM		{ ITlam }
-- 
1.7.10.4