d0p1/ack
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

Bug fix for dlb routines and C_ are now void

Browse source
This commit is contained in:
ceriel 1993-11-10 14:22:26 +00:00
parent 4f3e07061e
commit 528112d9bd
3 changed files with 8 additions and 8 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
util/ceg/EM_parser/common/C_instr2.c
View file

@ -79,8 +79,8 @@ t_C_info C_info[] = {
{ STRING, ARITH, 0, 0}, { STRING, ARITH, 0, 0},
{ "g", "o", 0, 0}, { "g", "o", 0, 0},
{ "extnd_dnam( g)", "o", 0, 0}}, { "extnd_dnam( g)", "o", 0, 0}},
/* EXTERNAL_DLB */ { "( g, o)\nchar *g;\narith o;\n{\n", /* EXTERNAL_DLB */ { "( g, o)\nlabel g;\narith o;\n{\n",
{ STRING, ARITH, 0, 0}, { LABEL, ARITH, 0, 0},
{ "g", "o", 0, 0}, { "g", "o", 0, 0},
{ "extnd_dlb( g)", "o", 0, 0}}, { "extnd_dlb( g)", "o", 0, 0}},
/* P_ARG */ { "( p)\nchar *p;\n{\n", /* P_ARG */ { "( p)\nchar *p;\n{\n",
@ -99,8 +99,8 @@ t_C_info C_info[] = {
{ ARITH, STRING, ARITH, INT}, { ARITH, STRING, ARITH, INT},
{ "n", "g", "o", "i"}, { "n", "g", "o", "i"},
{ "n", "extnd_dnam( 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", /* BSS_EXT_DLB */ { "( n, g, o, i)\nlabel g;\narith n, o;\nint i;\n{\n",
{ ARITH, STRING, ARITH, INT}, { ARITH, LABEL, ARITH, INT},
{ "n", "g", "o", "i"}, { "n", "g", "o", "i"},
{ "n", "extnd_dlb( 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", /* 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}, { STRING, 0, 0, 0},
{ "g", 0, 0, 0}, { "g", 0, 0, 0},
{ "extnd_dnam( g)", 0, 0, 0}}, { "extnd_dnam( g)", 0, 0, 0}},
/* EXT_DLB */ { "( g)\nchar *g;\n{\n", /* EXT_DLB */ { "( g)\nlabel g;\n{\n",
{ STRING, 0, 0, 0}, { LABEL, 0, 0, 0},
{ "g", 0, 0, 0}, { "g", 0, 0, 0},
{ "extnd_dlb( g)", 0, 0, 0}}, { "extnd_dlb( g)", 0, 0, 0}},
/* ONE_INT */ { "( i)\nint i;\n{\n", /* ONE_INT */ { "( i)\nint i;\n{\n",

2
util/ceg/EM_parser/common/help.c
View file

@ -73,7 +73,7 @@ char *str;
header( instr) header( instr)
char *instr; char *instr;
{ {
out( "%s%s", instr, C_instr_info->header); out( "void %s%s", instr, C_instr_info->header);
def_admn( instr); def_admn( instr);
} }

2
util/ceg/EM_parser/common/proto.make
View file

@ -13,7 +13,7 @@ OFILES = pars.$(SUF) Lpars.$(SUF) scan.$(SUF) mylex.$(SUF) default.$(SUF) \
C_instr2.$(SUF) help.$(SUF) eval.$(SUF) action.$(SUF) C_instr2.$(SUF) help.$(SUF) eval.$(SUF) action.$(SUF)
IFILES = -I$(TARGET_HOME)/h -I$(TARGET_HOME)/modules/h -I. -I$(SRC_DIR) IFILES = -I$(TARGET_HOME)/h -I$(TARGET_HOME)/modules/h -I. -I$(SRC_DIR)
CFLAGS = $(COPTIONS) $(IFILES) CFLAGS = $(COPTIONS) $(IFILES) -DNDEBUG
all : dummy all : dummy
make $(OFILES) make $(OFILES)