anchor.diff:  init_per_group(t_sendfile, Config) ->
       Priv = ?config(priv_dir, Config),
       SFilename = filename:join(Priv, "sendfile_small.html"),
  -    {ok, DS} = file:open(SFilename,[write]),
  -    io:format(DS,"yo baby yo",[]),
  +    {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"),
  
positive.code:     [{t_accept, [], [t_accept_timeout]},
       {t_connect, [], [t_connect_timeout, t_connect_bad]},
       {t_recv, [], [t_recv_timeout, t_recv_eof]},
       {t_sendfile, [], [{group, t_sendfile_raw},
  		       {group, t_sendfile_ioserv}]},
       {t_sendfile_raw, [], sendfile_all()},
       {t_sendfile_ioserv, [], sendfile_all()}].
  
  sendfile_all() ->
      [
  
negative.code:     [file:write(DB,[<<0:(10*8*1024*1024)>>]) || _I <- lists:seq(1,51)],
      file:sync(DB),
      file:close(DB),
      [{small_file, SFilename},
       {file_opts,[raw,binary]},
       {big_file, BFilename}|Config];
  init_per_group(_GroupName, Config) ->
      Config.
  
  