[project @ 1997-09-04 20:14:52 by sof]

QCONSYM added; removed unused productions (qdata_name, any_var_name)

ghc/compiler/rename/ParseIface.y

@@ -372,10 +372,6 @@ val_occs1	:: { [OccName] }
 		|  val_occ val_occs1	{ $1 : $2 }
 
 
-qvar_name	:: { RdrName }
-		:  QVARID		{ lexVarQual $1 }
-		|  QVARSYM		{ lexVarQual $1 }
-
 var_name	:: { RdrName }
 var_name	:  var_occ		{ Unqual $1 }
 
@@ -383,19 +379,10 @@ var_names1	:: { [RdrName] }
 var_names1	: var_name		{ [$1] }
 		| var_name var_names1	{ $1 : $2 }
 
-any_var_name	:: {RdrName}
-any_var_name	:  var_name		{ $1 }
-		|  qvar_name		{ $1 }
-
-qdata_name	:: { RdrName }
-qdata_name	:  QCONID		{ lexVarQual $1 }
-		|  QCONSYM		{ lexVarQual $1 }
-
 data_name	:: { RdrName }
 data_name	:  CONID		{ Unqual (VarOcc $1) }
 		|  CONSYM		{ Unqual (VarOcc $1) }
 
-
 tc_names1	:: { [RdrName] }
 		: tc_name			{ [$1] }
 		| tc_name COMMA tc_names1	{ $1 : $3 }
@@ -403,6 +390,7 @@ tc_names1	:: { [RdrName] }
 tc_name		:: { RdrName }
 tc_name		: tc_occ			{ Unqual $1 }
 		| QCONID			{ lexTcQual $1 }
+		| QCONSYM			{ lexTcQual $1 }
 
 tv_name		:: { RdrName }
 tv_name		:  VARID 		{ Unqual (TvOcc $1) }