anchor.diff:  
   %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
   
  -
  -
   send_segmented_msg_missing_seg_reply1(suite) ->
       [];
   send_segmented_msg_missing_seg_reply1(doc) ->
  
positive.code: 	"when a segment reply goes missing. Ack expected. "
  	"Send window = 3. ";
  send_segmented_msg_missing_seg_reply1(Config) when is_list(Config) ->
      put(verbosity, ?TEST_VERBOSITY),
      put(sname,     "TEST"),
      put(tc,        ssmmsr1),
      i("starting"),
  
      MgcNode = make_node_name(mgc),
      MgNode  = make_node_name(mg),
      d("start nodes: "
        "~n   MgcNode: ~p"
        "~n   MgNode:  ~p",
        [MgcNode, MgNode]),
      ok = megaco_test_lib:start_nodes([MgcNode, MgNode], ?FILE, ?LINE),
  
      d("[MGC] start the simulator "),
      {ok, Mgc} = megaco_test_tcp_generator:start_link("MGC", MgcNode),
  
negative.code: 	"Send window = 3. ";
  send_segmented_msg_ooo1(Config) when is_list(Config) ->
      Pre = fun() ->
                    MgcNode = make_node_name(mgc),
                    MgNode  = make_node_name(mg),
                    d("start nodes: "
  