anchor.diff:                                       "connect to *this* client"),
                                     ok = gen_udp:connect(Sock, CIP1, CPort1),
                                     ?P("[server] send reply"),
  -                                  ok = gen_udp:send(Sock, "hopp"),
  -                                  {CIP1, CPort1}
  +                                  case gen_udp:send(Sock, "hopp") of
  +                                      ok -> 
  +                                          {CIP1, CPort1};
  +                                      {error, ehostunreach = Reason1} ->
  +                                          ?P("[server] send failed: ~p",
  +                                             [Reason1]),
  +                                          exit({skip, Reason1});
  +                                      {error, Reason1} ->
  +                                          exit({send_failed, Reason1})
  +                                  end
                             after 5000 ->
                                     ?P("[server] receive (1) timeout:"
                                        "~n      ~p", [mq()]),
  
positive.code:             ?P("[csock 1] received expected reply message 1"),
              ok;
  
          {'EXIT', Server, SReason1} ->
              ?P("received unexpected server exit (1):"
                 "~n      ~p", [SReason1]),
  
negative.code:             ?P("[csock 1] received expected reply message 2"),
              ok;
  
          {'EXIT', Server, {skip, SReason2}} ->
              ?P("received unexpected server skip exit (2):"
                 "~n      ~p", [SReason2]),
              ?SKIPT(?F("server send (1,2) failed: ~p", [SReason2]));
  
          {'EXIT', Server, SReason2} ->
              ?P("received unexpected server exit (2):"
                 "~n.     ~p", [SReason2]),
  