anchor.diff:      stop(Mgc),
   
       i("traffic -> done", []),
  -    progress("done"),
       ok.
   
   
  
positive.code:     traffic_connect_mg(Mg, [{Name, Pid}|Acc]).
  
  traffic_connect_mg(Node, Name, Coding, Trans) ->
      Mid = {deviceName, Name}, 
      {ok, Pid} = start_mg(Node, Mid, Coding, Trans, ?MG_VERBOSITY),
  
      %% Ask the MGs to do a service change
      {ok, Res} = service_change(Pid),
      d("traffic_connect_mg -> (~s) service change result: ~p", [Name, Res]),
      Pid.
  
negative.code: traffic(doc) ->
      [];
  traffic(Config) when is_list(Config) ->
      Pre = fun() ->
                    progress("start nodes"),
                    MgcNode = make_node_name(mgc),
                    Mg1Node = make_node_name(mg1),
                    Mg2Node = make_node_name(mg2),
                    Mg3Node = make_node_name(mg3),
                    Mg4Node = make_node_name(mg4),
                    Nodes = [MgcNode, Mg1Node, Mg2Node, Mg3Node, Mg4Node],
                    d("traffic -> Nodes: "
                      "~n   MgcNode: ~p"
                      "~n   Mg1Node: ~p"
                      "~n   Mg2Node: ~p"
                      "~n   Mg3Node: ~p"
                      "~n   Mg4Node: ~p", 
                      [MgcNode, Mg1Node, Mg2Node, Mg3Node, Mg4Node]),
                    ok = ?START_NODES(Nodes, true),
                    Nodes
            end,
      Case = fun do_traffic/1,
      Post = fun(Nodes) ->
                     progress("stop nodes"),
                     d("stop nodes"),
                     ?STOP_NODES(lists:reverse(Nodes))
             end,
      try_tc(traffic, Pre, Case, Post).
  
  do_traffic([MgcNode, Mg1Node, Mg2Node, Mg3Node, Mg4Node]) ->
      %% Start the MGC and MGs
      i("start the MGC"),    
      progress("start MGC (on ~p)", [MgcNode]),
      ET = [{text,tcp}, {text,udp}, {binary,tcp}, {binary,udp}],
      {ok, Mgc} = 
  	start_mgc(MgcNode, {deviceName, "ctrl"}, ET, ?MGC_VERBOSITY),
  