src/debug/debug_print.c
void print_open_op_array_end(FILE* stream, uns array_length) {
  int field_mask = FULL_FIELD_MASK & (0x1 << BOTTOM_LINE_FIELD);
  uns jj;

  if(TESTBIT(field_mask, BOTTOM_LINE_FIELD)) {
    print_field_head(stream, BOTTOM_LINE_FIELD);
    for(jj = 0; jj < array_length; jj++)
      print_op_field(stream, NULL, BOTTOM_LINE_FIELD);
    print_field_tail(stream, BOTTOM_LINE_FIELD);
  }
}
/**************************************************************************************/
/* print_open_op_array_end: Print bottom line for an open op array */
Print bottom line for an open op array
Print bottom line for an open op array
void print_open_op_array_end(FILE* stream, uns array_length) {
  int field_mask = FULL_FIELD_MASK & (0x1 << BOTTOM_LINE_FIELD);
  uns jj;
  if(TESTBIT(field_mask, BOTTOM_LINE_FIELD)) {
    print_field_head(stream, BOTTOM_LINE_FIELD);
    for(jj = 0; jj < array_length; jj++)
      print_op_field(stream, NULL, BOTTOM_LINE_FIELD);
    print_field_tail(stream, BOTTOM_LINE_FIELD);
  }
}
void print_open_op_array_end ( FILE * stream , uns array_length ) { int field_mask = FULL_FIELD_MASK & ( 0x1 << BOTTOM_LINE_FIELD ) ; uns jj ; if ( TESTBIT ( field_mask , BOTTOM_LINE_FIELD ) ) { print_field_head ( stream , BOTTOM_LINE_FIELD ) ; for ( jj = 0 ; jj < array_length ; jj ++ ) print_op_field ( stream , NULL , BOTTOM_LINE_FIELD ) ; print_field_tail ( stream , BOTTOM_LINE_FIELD ) ; } }
print_open_op_array_end: Print bottom line for an open op array
print_open_op_array_end : Print bottom line for an open op array