void Generation::prepare_for_compaction(CompactPoint* cp) {

  {- -------------------------------------------
  (1) Generation 中の全ての space に対して,
      CompactibleSpace::prepare_for_compaction() を呼び出す.
      (first_compaction_space() から初めて, 
       next_compaction_space() で辿れなくなるまでループ)
      (なお, オーバーライドされているため ContiguousSpace::prepare_for_compaction() が呼ばれることもある)
      ---------------------------------------- -}

      // Generic implementation, can be specialized
      CompactibleSpace* space = first_compaction_space();
      while (space != NULL) {
        space->prepare_for_compaction(cp);
        space = space->next_compaction_space();
      }
    }