C++ (Cpp) mps_message_gc_start_whyの例

コード例 #1

ファイル: amcss.c プロジェクト: et4te/memory-pool-system

static void report(mps_arena_t arena)
{
  static int nCollsStart = 0;
  static int nCollsDone = 0;
  mps_message_type_t type;
    
  while(mps_message_queue_type(&type, arena)) {
    mps_message_t message;

    cdie(mps_message_get(&message, arena, type), "message get");

    switch(type) {
      /* @@@@ is using these macros in a switch supported? */
      case mps_message_type_gc_start(): {
        nCollsStart += 1;
        printf("\n{\n  Collection %d started.  Because:\n", nCollsStart);
        printf("    %s\n", mps_message_gc_start_why(arena, message));
        printf("    clock: %"PRIuLONGEST"\n", (ulongest_t)mps_message_clock(arena, message));
        break;
      }
      case mps_message_type_gc(): {
        size_t live, condemned, not_condemned;
        
        nCollsDone += 1;
        live = mps_message_gc_live_size(arena, message);
        condemned = mps_message_gc_condemned_size(arena, message);
        not_condemned = mps_message_gc_not_condemned_size(arena, message);

        printf("\n  Collection %d finished:\n", nCollsDone);
        printf("    live %"PRIuLONGEST"\n", (ulongest_t)live);
        printf("    condemned %"PRIuLONGEST"\n", (ulongest_t)condemned);
        printf("    not_condemned %"PRIuLONGEST"\n", (ulongest_t)not_condemned);
        printf("    clock: %"PRIuLONGEST"\n", (ulongest_t)mps_message_clock(arena, message));
        printf("}\n");

        if(condemned > (gen1SIZE + gen2SIZE + (size_t)128) * 1024) {
          /* When condemned size is larger than could happen in a gen 2
           * collection (discounting ramps, natch), guess that was a dynamic
           * collection, and reset the commit limit, so it doesn't run out. */
          die(mps_arena_commit_limit_set(arena, 2 * testArenaSIZE),
            "set limit");
        }
        break;
      }
      default: {
        cdie(0, "unknown message type");
        break;
      }
    }
    mps_message_discard(arena, message);
  }

  return;
}

コード例 #2

ファイル: amcss.c プロジェクト: alisheikh/hornet

static void report(mps_arena_t arena)
{
  static int nCollsStart = 0;
  static int nCollsDone = 0;
  mps_message_type_t type;
    
  while(mps_message_queue_type(&type, arena)) {
    mps_message_t message;

    cdie(mps_message_get(&message, arena, type), "message get");

    if (type == mps_message_type_gc_start()) {
      nCollsStart += 1;
      printf("\n{\n  Collection %d started.  Because:\n", nCollsStart);
      printf("    %s\n", mps_message_gc_start_why(arena, message));
      printf("    clock: %"PRIuLONGEST"\n", (ulongest_t)mps_message_clock(arena, message));

    } else if (type == mps_message_type_gc()) {
      size_t live, condemned, not_condemned;
      
      nCollsDone += 1;
      live = mps_message_gc_live_size(arena, message);
      condemned = mps_message_gc_condemned_size(arena, message);
      not_condemned = mps_message_gc_not_condemned_size(arena, message);

      printf("\n  Collection %d finished:\n", nCollsDone);
      printf("    live %"PRIuLONGEST"\n", (ulongest_t)live);
      printf("    condemned %"PRIuLONGEST"\n", (ulongest_t)condemned);
      printf("    not_condemned %"PRIuLONGEST"\n", (ulongest_t)not_condemned);
      printf("    clock: %"PRIuLONGEST"\n", (ulongest_t)mps_message_clock(arena, message));
      printf("}\n");

      if(condemned > (gen1SIZE + gen2SIZE + (size_t)128) * 1024) {
        /* When condemned size is larger than could happen in a gen 2
         * collection (discounting ramps, natch), guess that was a dynamic
         * collection, and reset the commit limit, so it doesn't run out.
         *
         * GDR 2013-03-12: Fiddling with the commit limit was causing
         * the test to fail sometimes (see job003440), so I've commented
         * out this feature.
         */
        /* die(mps_arena_commit_limit_set(arena, 2 * testArenaSIZE), "set limit"); */
      }

    } else {
      cdie(0, "unknown message type");
      break;
    }

    mps_message_discard(arena, message);
  }

  return;
}

コード例 #3

ファイル: amsss.c プロジェクト: et4te/memory-pool-system

static void report(void)
{
  static int nStart = 0;
  static int nComplete = 0;
  mps_message_type_t type;

  while(mps_message_queue_type(&type, arena)) {
    mps_message_t message;

    cdie(mps_message_get(&message, arena, type), "message get");

    switch(type) {
    /* @@@@ is using these macros in a switch supported? */
    case mps_message_type_gc_start():
      printf("\nCollection start %d.  Because:\n", ++nStart);
      printf("%s\n", mps_message_gc_start_why(arena, message));

      break;
    case mps_message_type_gc():
      {
        size_t live, condemned, not_condemned;

        live = mps_message_gc_live_size(arena, message);
        condemned = mps_message_gc_condemned_size(arena, message);
        not_condemned = mps_message_gc_not_condemned_size(arena, message);

        printf("\nCollection complete %d:\n", ++nComplete);
        printf("live %"PRIuLONGEST"\n", (ulongest_t)live);
        printf("condemned %"PRIuLONGEST"\n", (ulongest_t)condemned);
        printf("not_condemned %"PRIuLONGEST"\n", (ulongest_t)not_condemned);
      }
      break;
    default:
      cdie(0, "unknown message type");
    }
    mps_message_discard(arena, message);
  }

  return;
}

コード例 #4

ファイル: amcss.c プロジェクト: CarterTsai/clasp

static void report(mps_arena_t arena)
{
  static int nCollsStart = 0;
  static int nCollsDone = 0;
  mps_message_type_t type;
    
  while(mps_message_queue_type(&type, arena)) {
    mps_message_t message;

    cdie(mps_message_get(&message, arena, type), "message get");

    if (type == mps_message_type_gc_start()) {
      nCollsStart += 1;
      printf("\n{\n  Collection %d started.  Because:\n", nCollsStart);
      printf("    %s\n", mps_message_gc_start_why(arena, message));
      printf("    clock: %"PRIuLONGEST"\n", (ulongest_t)mps_message_clock(arena, message));

    } else if (type == mps_message_type_gc()) {
      size_t live, condemned, not_condemned;
      
      nCollsDone += 1;
      live = mps_message_gc_live_size(arena, message);
      condemned = mps_message_gc_condemned_size(arena, message);
      not_condemned = mps_message_gc_not_condemned_size(arena, message);

      printf("\n  Collection %d finished:\n", nCollsDone);
      printf("    live %"PRIuLONGEST"\n", (ulongest_t)live);
      printf("    condemned %"PRIuLONGEST"\n", (ulongest_t)condemned);
      printf("    not_condemned %"PRIuLONGEST"\n", (ulongest_t)not_condemned);
      printf("    clock: %"PRIuLONGEST"\n", (ulongest_t)mps_message_clock(arena, message));
      printf("}\n");
    } else {
      cdie(0, "unknown message type");
      break;
    }

    mps_message_discard(arena, message);
  }
}

コード例 #5

ファイル: amsss.c プロジェクト: aseaday/mps-temporary

static void report(void)
{
  static int nStart = 0;
  static int nComplete = 0;
  mps_message_type_t type;

  while(mps_message_queue_type(&type, arena)) {
    mps_message_t message;

    cdie(mps_message_get(&message, arena, type), "message get");

    if (type == mps_message_type_gc_start()) {
      printf("\nCollection start %d.  Because:\n", ++nStart);
      printf("%s\n", mps_message_gc_start_why(arena, message));

    } else if (type == mps_message_type_gc()) {
      size_t live, condemned, not_condemned;

      live = mps_message_gc_live_size(arena, message);
      condemned = mps_message_gc_condemned_size(arena, message);
      not_condemned = mps_message_gc_not_condemned_size(arena, message);

      printf("\nCollection complete %d:\n", ++nComplete);
      printf("live %"PRIuLONGEST"\n", (ulongest_t)live);
      printf("condemned %"PRIuLONGEST"\n", (ulongest_t)condemned);
      printf("not_condemned %"PRIuLONGEST"\n", (ulongest_t)not_condemned);

    } else {
      cdie(0, "unknown message type");
    }

    mps_message_discard(arena, message);
  }

  return;
}