anchor.diff:  
       %% Update state...
       NewSegments = [SegmentRO|Segments],
  -    NewState1 = State#state {
  +    NewState = State#state {
           locks=NewLocks,
           buffers=Buffers -- [Buffer],
           segments=NewSegments
  
positive.code:     {noreply, NewState};
  
  handle_cast({buffer_to_segment, Buffer, SegmentWO}, State) ->
      #state { locks=Locks, buffers=Buffers, segments=Segments, scheduled_compaction=ScheduledCompaction } = State,
  
      %% Clean up by clearing delete flag on the segment, adding delete
      %% flag to the buffer, and telling the system to delete the buffer
  
negative.code:         buffers  = [Buffer],
          segments = Segments,
          next_id  = NextID,
          is_compacting = false,
          buffer_converter = Converter,
          stream_range_pids = []
  