anchor.diff:  %%
   %% %CopyrightBegin%
   %%
  -%% Copyright Ericsson AB 1999-2017. All Rights Reserved.
  +%% Copyright Ericsson AB 1999-2018. All Rights Reserved.
   %%
   %% Licensed under the Apache License, Version 2.0 (the "License");
   %% you may not use this file except in compliance with the License.
  
positive.code: %% tcp_drv.c which used it to detect simultaneous connection
  %% attempts).
  %%
  recv_name(#hs_data{socket = Socket, f_recv = Recv}) ->
      case Recv(Socket, 0, infinity) of
  	{ok,Data} ->
  	    get_name(Data);
  	_ ->
  	    ?shutdown(no_node)
      end.
  
  get_name([$n,VersionA, VersionB, Flag1, Flag2, Flag3, Flag4 | OtherNode] = Data) ->
      case is_valid_name(OtherNode) of
          true ->
              {?u32(Flag1, Flag2, Flag3, Flag4), list_to_atom(OtherNode), 
               ?u16(VersionA,VersionB)};
          false ->
              ?shutdown(Data)
      end;
  get_name(Data) ->
      ?shutdown(Data).
  
  is_valid_name(OtherNodeName) ->
      case string:lexemes(OtherNodeName,"@") of
  
negative.code: handshake_other_started(OldHsData) when element(1,OldHsData) =:= hs_data ->
      handshake_other_started(convert_old_hsdata(OldHsData)).
  
  
  %%
  %% Check mandatory flags...
  