anchor.diff:  datadir(Config) ->
       proplists:get_value(data_dir, Config).
   
  +-define(KiB, 1024).
  +-define(MiB, (1024 * 1024)).
  +-define(GiB, (1024 * 1024 * 1024)).
  +
  +fmt_words(Words) ->
  +    BSize = Words * erlang:system_info(wordsize),
  +    if BSize < ?KiB ->
  +            integer_to_list(BSize);
  +       BSize < ?MiB ->
  +            io_lib:format("~8.2fKiB (~8w)", [BSize / ?KiB, BSize]);
  +       BSize < ?GiB ->
  +            io_lib:format("~8.2fMiB (~8w)", [BSize / ?MiB, BSize]);
  +       true ->
  +            io_lib:format("~8.2fGiB (~8w)", [BSize / ?GiB, BSize])
  +    end.
  +
  +log_rsp_size(Label, Term) ->
  +    S = erts_debug:size(Term),
  +    ct:pal("~s: ~w test(s), Memory used: ~s",
  +           [Label, length(Term), fmt_words(S)]).
  +
   read_rsp(Config, Type, Files) ->
  -    lists:reverse(
  -      lists:foldl(
  -        fun(FileName, AccIn) ->
  -                AccOut = read_rsp_file(filename:join(datadir(Config), FileName),
  -                                       Type, AccIn),
  -                erlang:garbage_collect(),
  -                AccOut
  -        end, [], Files)).
  +    Tests =
  +        lists:foldl(
  +          fun(FileName, Acc) ->
  +                  read_rsp_file(filename:join(datadir(Config), FileName),
  +                                Type, Acc)
  +          end, [], Files),
  +    log_rsp_size(Type, Tests),
  +    Tests.
   
   read_rsp_file(FileName, Type, Acc) ->
       {ok, Raw} = file:read_file(FileName),
  
positive.code: 	    ok
      end,
  
      Blocks = proplists:get_value(block, Config),
      lists:foreach(fun block_cipher/1, Blocks),
      lists:foreach(fun block_cipher/1, block_iolistify(Blocks)),
      lists:foreach(fun block_cipher_increment/1, block_iolistify(Blocks)).
  
negative.code:     Stream = aes_ctr(),
      [{stream, Stream} | Config];
  group_config(aes_gcm, Config) ->
      AEAD = fun() -> aes_gcm(Config) end,
      [{aead, AEAD} | Config];
  group_config(chacha20_poly1305, Config) ->
      AEAD = chacha20_poly1305(),
  