anchor.diff:      Send = fun(Sock) ->
   		   {_Size, <<_:5/binary,Data:3/binary,_/binary>> = AllData} =
   		       sendfile_file_info(Filename),
  -		   {ok,D} = file:open(Filename,[read,binary|FileOpts]),
  +		   {ok,D} = file:open(Filename,[read|FileOpts]),
   		   {ok,3} = gen_tcp:sendfile(D,Sock,5,3,[]),
   		   {ok, AllData} = file:read(D,100),
   		   file:close(D),
  
positive.code:     [file:write(DB,[<<0:(10*8*1024*1024)>>]) || _I <- lists:seq(1,51)],
      file:sync(DB),
      file:close(DB),
      [{small_file, SFilename},{big_file, BFilename}|Config];
  init_per_group(t_sendfile_raw, Config) ->
      [{file_opts, [raw]}|Config];
  init_per_group(_GroupName, Config) ->
      Config.
  
  
negative.code: init_per_group(t_sendfile, Config) ->
      Priv = ?config(priv_dir, Config),
      SFilename = filename:join(Priv, "sendfile_small.html"),
      {ok, DS} = file:open(SFilename,[write,raw]),
      file:write(DS,"yo baby yo"),
      file:sync(DS),
      file:close(DS),
      BFilename = filename:join(Priv, "sendfile_big.html"),
  