// file: $PDSP/class/float_8/v1.0/flt8_mem_0.cc
//

// isip include files
//
#include "float_8.h"
#include <integral_constants.h>

// method: modify_memory_cc
//
// arguments:
//  int_4 incr_a: (input) number of new objects allocated
//
// return: a logical_1 indicating the status
//
logical_1 Float_8::modify_memory_cc(int_4 incr_a) {

  // increment the memory counter
  //
  num_objs_d += incr_a;

  // print debug information if necessary
  //
  if (debug_level_d > ISIP_DEBUG_DETAILED) {
    fprintf(stdout, "%s: number of objects currently allocated = %ld\n",
	    "Float_8::modify_memory_cc", num_objs_d);
  }
    
  // exit gracefully
  //
  return ISIP_TRUE;
}