anchor.diff:  
       NewState0#state{compaction_start_ts=undefined}.
   
  -maybe_kill_scheduled_compaction(#state{scheduled_compaction_tref=TRef} = State) ->
  -    timer:cancel(TRef),
  -    receive
  -        compact ->
  -            ok
  -    after 0 ->
  -            ok
  -    end,
  -
  -    State#state{scheduled_compaction_tref=undefined}.
  -
   now_utc_seconds() ->
       calendar:datetime_to_gregorian_seconds(erlang:universaltime()).
   
  
positive.code: 
  %% API
  -export([start_link/0,
           pause/0, unpause/0,
  
           force_compact_bucket/1,
           force_compact_db_files/1, force_compact_view/2]).
  
  %% gen_fsm callbacks
  -export([init/1, handle_event/3, handle_sync_event/4, handle_info/3,
           code_change/4, terminate/3,
  
           idle/3, compacting/3, paused/3]).
  
  -record(state, {buckets_to_compact,
                  compactor_pid,
  
negative.code: %% API
  start_link() ->
      gen_fsm:start_link({local, ?MODULE}, ?MODULE, [], []).
  
  force_compact_bucket(Bucket) ->
      BucketBin = list_to_binary(Bucket),
  