anchor.diff:  		socket_bailout([S1,S2])
   	end,
       %%
  -    ?line S3 = socket_peeloff(Socket1, S1Ai, Timeout),
  +    ?line S3 = socket_peeloff(Socket1, S1Ai, SockOpts, Timeout),
       ?line ?LOGVAR(S3),
       ?line P3_X = socket_call(S3, get_port),
       ?line ?LOGVAR(P3_X),
  
positive.code: %%% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  %%% socket gen_server ultra light
  
  socket_open(SocketOpts, Timeout) ->
      Opts = [{type,seqpacket},{active,once},binary|SocketOpts],
      Starter =
  	fun () ->
  		{ok,Socket} =
  
negative.code: 	end,
      s_start(Starter, Timeout).
  
  socket_peeloff(Socket, AssocId, SocketOpts, Timeout) ->
      Opts = [binary|SocketOpts],
      Starter =
  	fun () ->
  		{ok,NewSocket} =
  