From 528112d9bdfaa6aaa31b5210369151ae99a9f401 Mon Sep 17 00:00:00 2001 From: ceriel Date: Wed, 10 Nov 1993 14:22:26 +0000 Subject: [PATCH] Bug fix for dlb routines and C_ are now void --- util/ceg/EM_parser/common/C_instr2.c | 12 ++++++------ util/ceg/EM_parser/common/help.c | 2 +- util/ceg/EM_parser/common/proto.make | 2 +- 3 files changed, 8 insertions(+), 8 deletions(-) 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)