anchor.diff:                  NumOfBatchProcs - 1
           end,
   
  -    NextStatus = ?ST_RUNNING,
  -    State_3 =
  +    {NextStatus, State_3} =
           case catch execute(State#state{is_diagnosing = IsDiagnose}) of
               %% Lock the object-storage in order to
               %%     reject requests during the data-compaction
  
positive.code:                                   State_1#state{is_locked = true}
                            end,
                  ok = run(Id, IsDiagnose),
                  State_2;
              %% Execute the data-compaction repeatedly
              {ok, {next, State_1}} ->
                  ok = run(Id, IsDiagnose),
                  State_1;
              %% An unxepected error has occured
              {'EXIT', Cause} ->
                  ok = finish(Id),
                  {_,State_2} = after_execute({error, Cause}, State),
                  State_2;
              %% Reached end of the object-container
              {ok, {eof, State_1}} ->
                  ok = finish(Id),
                  {_,State_2} = after_execute(ok, State_1),
                  State_2;
              %% An epected error has occured
              {{error, Cause}, State_1} ->
                  ok = finish(Id),
                  {_,State_2} = after_execute({error, Cause}, State_1),
                  State_2
          end,
      {next_state, NextStatus, State_3#state{status = NextStatus,
                                             num_of_batch_procs = NumOfBatchProcs_1}};
  
negative.code:                             compaction_prms =
                                  #compaction_prms{
                                     num_of_active_objs  = _NumActiveObjs,
                                     size_of_active_objs = _SizeActiveObjs}}}) ->
      ok;
  
  after_execute_1({ok, #state{meta_db_id       = MetaDBId,
                              obj_storage_id   = ObjStorageId,
  