anchor.diff:  
   call(Config, Req, Opts) ->
       Name = proplists:get_value(testcase, Config),
  -    [Enc] = name(proplists:get_value(group, Config)),
  +    [Encoding, Client] = name(proplists:get_value(group, Config)),
       diameter:call(?CLIENT,
                     dict(Req),
  -                  req(Req, Enc),
  -                  [{extra, [Name]} | Opts]).
  +                  req(Req, Encoding),
  +                  [{extra, [Name, Client]} | Opts]).
   
   req(['ACR' = H | T], record) ->
       ?ACCT:'#new-'(?ACCT:msg2rec(H), T);
  
positive.code:          {'Vendor-Id', 12345},
           {'Product-Name', "OTP/diameter"},
           {'Auth-Application-Id', [?DIAMETER_APP_ID_COMMON]},
           {'Acct-Application-Id', [?DIAMETER_APP_ID_ACCOUNTING]}
           | [{application, [{dictionary, D},
                             {module, ?MODULE},
                             {answer_errors, callback}]}
  
negative.code:     Rec.
  
  %% Contruct and deconstruct names to work around group names being
  %% restricted to atoms.
  
  name(Names)
    when is_list(Names) ->
  