void CollectorPolicy::initialize_perm_generation(PermGen::Name pgnm) {

  {- -------------------------------------------
  (1) PermanentGenerationSpec オブジェクトを生成して 
      _permanent_generation フィールドにセットする.

      (もし生成が失敗したら, ここで異常終了させる)
      ---------------------------------------- -}

      _permanent_generation =
        new PermanentGenerationSpec(pgnm, PermSize, MaxPermSize,
                                    SharedReadOnlySize,
                                    SharedReadWriteSize,
                                    SharedMiscDataSize,
                                    SharedMiscCodeSize);
      if (_permanent_generation == NULL) {
        vm_exit_during_initialization("Unable to allocate gen spec");
      }
    }