From 6f0be895eb4019159fcbdea010b87685307756c2 Mon Sep 17 00:00:00 2001
From: sof <unknown>
Date: Tue, 9 Jun 1998 09:53:03 +0000
Subject: [PATCH] [project @ 1998-06-09 09:53:03 by sof] typo in classd

---
 ghc/compiler/parser/hsparser.y | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ghc/compiler/parser/hsparser.y b/ghc/compiler/parser/hsparser.y
index 627ccfe5a51d..663777977cc5 100644
--- a/ghc/compiler/parser/hsparser.y
+++ b/ghc/compiler/parser/hsparser.y
@@ -511,7 +511,7 @@ classd	:  classkey btype DARROW simple_con_app1 cbody
 	|  classkey btype cbody
 		/* We have to say btype rather than simple_con_app1, else
 		   we get reduce/reduce errs */
-		{ check_class_decl_head($3);
+		{ check_class_decl_head($2);
 		  $$ = mkcbind(Lnil,$2,$3,startlineno); }
 	;
 
-- 
GitLab