anchor.diff:  	end,
   	case gen_tcp:recv (Socket, 0, 250) of
   		{ok, Payload} ->
  +			% ok = mosaic_transcript:trace_information ("broadcasted...", [{source, {SourceIp, SourcePort}}]),
   			Agent ! {tcp, Socket, SourceIp, SourcePort, Payload},
   			inputer_loop (Agent, Socket, SourceIp, SourcePort);
   		{error, timeout} ->
  
positive.code: 		{tcp_connect, Socket} ->
  			ok
  	end,
  	case gen_tcp:shutdown (Socket, read) of
  		ok ->
  			outputer_loop (Agent, Socket);
  		{error, Reason} ->
  			erlang:exit ({error, {failed_socket, Socket, Reason}})
  	end.
  
  outputer_loop (Agent, Socket) ->
  	receive
  		{tcp, Socket, Payload} when is_binary (Payload) ->
  			case gen_tcp:send (Socket, Payload) of
  				ok ->
  					outputer_loop (Agent, Socket);
  				{error, closed} ->
  					erlang:exit (normal);
  				{error, Reason} ->
  					erlang:exit ({error, {failed_socket, Socket, Reason}})
  
negative.code: 														erlang:self () ! {tcp_close, Socket},
  														outputer_init (Self, Socket);
  													{error, Reason} ->
  														ok = mosaic_transcript:trace_warning ("connecting failed; ignoring!", [{target, {SocketIp, SocketPort}}, {reason, Reason}]),
  														erlang:exit (normal)
  												end
  											end),
  