We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 57637a0 commit b1de9c6Copy full SHA for b1de9c6
cobj/codegen.c
@@ -5067,12 +5067,6 @@ static void joutput_init_method(struct cb_program *prog) {
5067
prevprog = blp->curr_prog;
5068
joutput_prefix();
5069
joutput("/* PROGRAM-ID : %s */\n", prevprog);
5070
- joutput_prefix();
5071
- joutput("%s = new CobolDataStorage(%d);", base_name,
5072
- blp->f->memory_size);
5073
- free(base_name);
5074
- joutput("\t/* %s */\n", blp->f->name);
5075
- continue;
5076
}
5077
5078
if (blp->f->flag_external) {
0 commit comments