From 2382ef1a27be689ee5ff27a21324081ef5ce6a65 Mon Sep 17 00:00:00 2001
From: ceriel <none@none>
Date: Fri, 21 Feb 1997 17:22:42 +0000
Subject: [PATCH] Additions for non-correcting error recovery

---
 lang/m2/m2mm/proto.make  | 5 +++--
 lang/m2/m2mm/statement.g | 3 ++-
 2 files changed, 5 insertions(+), 3 deletions(-)

diff --git a/lang/m2/m2mm/proto.make b/lang/m2/m2mm/proto.make
index 5af7d4f62..70295df9e 100644
--- a/lang/m2/m2mm/proto.make
+++ b/lang/m2/m2mm/proto.make
@@ -12,7 +12,7 @@ SRC_DIR = \
 TABGEN=	$(UTIL_BIN)/tabgen
 LLGEN =	$(UTIL_BIN)/LLgen
 LLGENOPTIONS = \
-	-v
+	-v -n
 
 SRC_G =	$(SRC_DIR)/program.g $(SRC_DIR)/declar.g \
 	$(SRC_DIR)/expression.g $(SRC_DIR)/statement.g
@@ -24,7 +24,7 @@ SRC_C =	$(SRC_DIR)/LLlex.c $(SRC_DIR)/LLmessage.c $(SRC_DIR)/error.c \
 	$(SRC_DIR)/idf.c $(SRC_DIR)/input.c $(SRC_DIR)/misc.c \
 	$(SRC_DIR)/options.c
 GEN_C =	tokenfile.c program.c declar.c expression.c statement.c \
-	symbol2str.c char.c Lpars.c
+	symbol2str.c char.c Lpars.c Lncor.c
 CFILES=	$(SRC_C) $(GEN_C)
 
 SRC_H =	$(SRC_DIR)/LLlex.h $(SRC_DIR)/class.h \
@@ -104,6 +104,7 @@ clean:
 LLfiles:	$(GFILES)
 		$(LLGEN) $(LLGENOPTIONS) $(GFILES)
 		@touch LLfiles
+		@if [ -f Lncor.c ] ; then : ; else touch Lncor.c ; fi
 
 tokenfile.g:	$(SRC_DIR)/tokenname.c $(SRC_DIR)/make.tokfile
 		$(SRC_DIR)/make.tokfile <$(SRC_DIR)/tokenname.c >tokenfile.g
diff --git a/lang/m2/m2mm/statement.g b/lang/m2/m2mm/statement.g
index ec3a54f13..bbdfd7a50 100644
--- a/lang/m2/m2mm/statement.g
+++ b/lang/m2/m2mm/statement.g
@@ -30,7 +30,8 @@ statement :
 		ActualParameters?
 	|
 		[ BECOMES	
-		| '='		{ error("':=' expected instead of '='");
+		| %erroneous
+		  '='		{ error("':=' expected instead of '='");
 				  DOT = BECOMES;
 				}
 		]