anchor.diff:  seq_append_server_loop(DataDir, Prefix, _File, FH, FileNum, Offset)
     when Offset > ?MAX_FILE_SIZE ->
       ok = file:close(FH),
  -    error_logger:info_msg("rollover: ~p server at file ~w offset ~w\n",
  -                          [Prefix, FileNum, Offset]),
  +    info_msg("rollover: ~p server at file ~w offset ~w\n",
  +             [Prefix, FileNum, Offset]),
       run_seq_append_server2(Prefix, DataDir);    
   seq_append_server_loop(DataDir, Prefix, File, FH, FileNum, Offset) ->
       receive
  
positive.code:            after
                 gen_tcp:close(Sock)
             end,
      escript_upload_redundant2(HPs, OSFs, LocalFile).
  
  escript_upload_redundant2([], _OSFs, _LocalFile) ->
      ok;
  escript_upload_redundant2([Host, PortStr|HPs], OSFs, LocalFile) ->
      Sock = escript_connect(Host, PortStr),
      {ok, FH} = file:open(LocalFile, [read, binary, raw]),
      try
          [begin
               {ok, Chunk} = file:read(FH, Size),
               _OSF2 = upload_chunk_write(Sock, Offset, File, Chunk)
               %% io:format("~p: ~p\n", [{Host, PortStr}, OSF2])
           end || {Offset, Size, File} <- OSFs]
      after
          gen_tcp:close(Sock),
          file:close(FH)
      end,
      escript_upload_redundant2(HPs, OSFs, LocalFile).
  
  escript_download_chunks(Sock, ChunkFileList) ->
      {ok, FH} = file:open(ChunkFileList, [read, raw, binary]),
  
negative.code: run_seq_append_server2(Prefix, DataDir) ->
      FileNum = read_max_filenum(DataDir, Prefix) + 1,
      ok = increment_max_filenum(DataDir, Prefix),
      info_msg("start: ~p server at file ~w\n", [Prefix, FileNum]),
      seq_append_server_loop(DataDir, Prefix, FileNum).
  
  seq_append_server_loop(DataDir, Prefix, FileNum) ->
  