diff --git a/cobc/ChangeLog b/cobc/ChangeLog index 35fa3a893..555705b15 100644 --- a/cobc/ChangeLog +++ b/cobc/ChangeLog @@ -1,9 +1,4 @@ -2020-12-08 Ron Norman - - * codegen.c: emit 01/77 USAGE POINTER as 'unsigned char * xxx[1]' - so that it is properly aligned for the hardware - 2020-12-07 Simon Sobisch * codegen.c (output_display_fields): prevent bad integer promotion in diff --git a/cobc/codegen.c b/cobc/codegen.c index a055155f4..0169e8121 100644 --- a/cobc/codegen.c +++ b/cobc/codegen.c @@ -2007,10 +2007,6 @@ output_local_base_cache (void) } else if (blp->f->index_type == CB_STATIC_INT_INDEX) { output_local ("static int %s%d;", CB_PREFIX_BASE, blp->f->id); - } else if (blp->f->flag_is_pointer - && (blp->f->level == 1 || blp->f->level == 77)) { - output_local ("static unsigned char *%s%d[1];", - CB_PREFIX_BASE, blp->f->id); } else if( !(blp->f->report_flag & COB_REPORT_REF_EMITTED)) { #ifdef HAVE_ATTRIBUTE_ALIGNED output_local ("static cob_u8_t %s%d[%d]%s;",