anchor.diff:                         server_decoding = D,
                          server_sender = SS,
                          server_throttle = ST},
  -            [{group, G}, {runlist, select()} | Config];
  +            [{group, G}, {runlist, select(T)} | Config];
           _ ->
               Config
       end.
  
positive.code: end_per_group(_, _) ->
      ok.
  
  select() ->
      try rand:uniform(?LIMIT) of
          N -> lists:sublist(?util:scramble(tc()), max(N,5))
      catch
          error:_ -> ?LIMIT
      end.
  
negative.code: %% Positive number of testcases from which to select (randomly) from
  %% tc(), the list of testcases to run, or [] to run all. The random
  %% selection is to limit the time it takes for the suite to run.
  -define(LIMIT, #{tcp => 42, sctp => 5}).
  
  -define(util, diameter_util).
  
  