anchor.diff:           traffic_ping_pong_small_send_and_recv_tcpL/1,
            traffic_ping_pong_medium_send_and_recv_tcp4/1,
            traffic_ping_pong_medium_send_and_recv_tcp6/1,
  +         traffic_ping_pong_medium_send_and_recv_tcpL/1,
            traffic_ping_pong_large_send_and_recv_tcp4/1,
            traffic_ping_pong_large_send_and_recv_tcp6/1,
   
  
positive.code: %% small (8 bytes), medium (8K) and large (8M).
  %% The message is sent from A to B and then back again. This is 
  %% repeated a set number of times (more times the small the message).
  %% This is the 'large' message test case, for IPv4.
  
  traffic_ping_pong_large_send_and_recv_tcp4(suite) ->
  
negative.code: traffic_ping_pong_large_send_and_recv_tcp4(doc) ->
      [];
  traffic_ping_pong_large_send_and_recv_tcp4(_Config) when is_list(_Config) ->
      ?TT(?SECS(45)),
      Msg = l2b(?TPP_LARGE),
      Num = ?TPP_LARGE_NUM,
      tc_try(traffic_ping_pong_large_send_and_recv_tcp4,
             fun() ->
                     InitState = #{domain => inet,
                                   proto  => tcp,
                                   msg    => Msg,
  