X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compiler%2Fparser%2FParser.y.pp;fp=compiler%2Fparser%2FParser.y.pp;h=26bb4e74357a1139fefa61c99f718ab8799a15e8;hp=62eebef93676dc051c9b754b7c33afc81293a4ef;hb=2c1c4d3540e5671274d45a473f1d1da5d37f76c1;hpb=b3aa38b3534e402a706712dc56c3990ebe1acd05

diff --git a/compiler/parser/Parser.y.pp b/compiler/parser/Parser.y.pp
index 62eebef..26bb4e7 100644
--- a/compiler/parser/Parser.y.pp
+++ b/compiler/parser/Parser.y.pp
@@ -476,7 +476,7 @@ export 	:: { LIE RdrName }
 	|  oqtycon '(' ')'		{ LL (IEThingWith (unLoc $1) []) }
 	|  oqtycon '(' qcnames ')'	{ LL (IEThingWith (unLoc $1) (reverse $3)) }
 	|  'module' modid		{ LL (IEModuleContents (unLoc $2)) }
-
+        | '<[' incdepth export decdepth ']>' { $3 }
 qcnames :: { [RdrName] }
 	:  qcnames ',' qcname_ext	{ unLoc $3 : $1 }
 	|  qcname_ext			{ [unLoc $1]  }