From: ceriel <none@none>
Date: Wed, 10 Nov 1993 14:22:26 +0000 (+0000)
Subject: Bug fix for dlb routines and C_ are now void
X-Git-Tag: release-5-5~244
X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=528112d9bdfaa6aaa31b5210369151ae99a9f401;p=ack.git

Bug fix for dlb routines and C_ are now void
---

diff --git a/util/ceg/EM_parser/common/C_instr2.c b/util/ceg/EM_parser/common/C_instr2.c
index 19281bd49..f9d8b5b85 100644
--- a/util/ceg/EM_parser/common/C_instr2.c
+++ b/util/ceg/EM_parser/common/C_instr2.c
@@ -79,8 +79,8 @@ t_C_info C_info[] = {
 			       { STRING, ARITH, 0, 0},
 			       { "g", "o", 0, 0},
 			       { "extnd_dnam( g)", "o", 0, 0}},
-	/* EXTERNAL_DLB	*/   { "( g, o)\nchar *g;\narith o;\n{\n",
-			       { STRING, ARITH, 0, 0},
+	/* EXTERNAL_DLB	*/   { "( g, o)\nlabel g;\narith o;\n{\n",
+			       { LABEL, ARITH, 0, 0},
 			       { "g", "o", 0, 0},
 			       { "extnd_dlb( g)", "o", 0, 0}},
 	/* P_ARG	*/   { "( p)\nchar *p;\n{\n",
@@ -99,8 +99,8 @@ t_C_info C_info[] = {
 			       { ARITH, STRING, ARITH, INT},
 			       { "n", "g", "o", "i"},
 			       { "n", "extnd_dnam( g)", "o", "i"}},
-	/* BSS_EXT_DLB	*/   { "( n, g, o, i)\nchar *g;\narith n, o;\nint i;\n{\n",
-			       { ARITH, STRING, ARITH, INT},
+	/* BSS_EXT_DLB	*/   { "( n, g, o, i)\nlabel g;\narith n, o;\nint i;\n{\n",
+			       { ARITH, LABEL, ARITH, INT},
 			       { "n", "g", "o", "i"},
 			       { "n", "extnd_dlb( g)", "o", "i"}},
 	/* BSS_STR+AR	*/   { "( n, val, sz, i)\nchar *val;\narith n, sz;\nint i;\n{\n",
@@ -131,8 +131,8 @@ t_C_info C_info[] = {
 			       { STRING, 0, 0, 0},
 			       { "g", 0, 0, 0},
 			       { "extnd_dnam( g)", 0, 0, 0}},
-	/* EXT_DLB	*/   { "( g)\nchar *g;\n{\n",
-			       { STRING, 0, 0, 0},
+	/* EXT_DLB	*/   { "( g)\nlabel g;\n{\n",
+			       { LABEL, 0, 0, 0},
 			       { "g", 0, 0, 0},
 			       { "extnd_dlb( g)", 0, 0, 0}},
 	/* ONE_INT	*/   { "( i)\nint i;\n{\n",
diff --git a/util/ceg/EM_parser/common/help.c b/util/ceg/EM_parser/common/help.c
index 811a8b508..85a54a0d0 100644
--- a/util/ceg/EM_parser/common/help.c
+++ b/util/ceg/EM_parser/common/help.c
@@ -73,7 +73,7 @@ char *str;
 header( instr)
 char *instr;
 {
-	out( "%s%s", instr, C_instr_info->header);
+	out( "void %s%s", instr, C_instr_info->header);
 	def_admn( instr);
 }
 
diff --git a/util/ceg/EM_parser/common/proto.make b/util/ceg/EM_parser/common/proto.make
index 9e0c085e0..a1e729d68 100644
--- a/util/ceg/EM_parser/common/proto.make
+++ b/util/ceg/EM_parser/common/proto.make
@@ -13,7 +13,7 @@ OFILES = pars.$(SUF) Lpars.$(SUF) scan.$(SUF) mylex.$(SUF) default.$(SUF) \
 	 C_instr2.$(SUF) help.$(SUF) eval.$(SUF) action.$(SUF)
 
 IFILES = -I$(TARGET_HOME)/h -I$(TARGET_HOME)/modules/h -I. -I$(SRC_DIR)
-CFLAGS = $(COPTIONS) $(IFILES)
+CFLAGS = $(COPTIONS) $(IFILES) -DNDEBUG
 
 all :	dummy
 	make $(OFILES)