anchor.diff:  
   -define(RESULTVEC_SIZE, 1000).
   -define(DELETEME_FLAG, ".deleted").
  --define(ROLLOVER_SIZE(S), S#state.buffer_rollover_size).
   
   register_buffer_converter(ServerPid, ConverterPid) ->
       gen_server:cast(ServerPid, {register_buffer_converter, ConverterPid}).
  
positive.code:     gen_server:cast(ServerPid, {buffer_to_segment, Buffer, SegmentWO}).
  
  init([Root]) ->
      %% Load from disk...
      filelib:ensure_dir(join(Root, "ignore")),
      io:format("Loading merge_index from '~s'~n", [Root]),
  
negative.code:     %% Update the state...
      NewState = State#state {buffers = [CurrentBuffer | Buffers]},
  
      %% Possibly dump buffer to a new segment. 
      case mi_buffer:filesize(CurrentBuffer) > State#state.buffer_rollover_size of
          true ->
              #state { next_id=NextID } = NewState,
              
  