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

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]  }