anchor.diff:  %% @private
   receive_message(Socket, Transport) ->
       receive
  +        {tcp_closed, Socket} ->
  +            Transport:close(Socket),
  +            bo;
           Message ->
               decode(Message)
  -    after
  -        ?TIMEOUT ->
  -            Transport:close(Socket)
       end.
   
   %% @private
  
positive.code:                     send_message(Socket, Transport, {error, pang})
              end;
          Response ->
              send_message(Socket, Transport, {error, {invalid_response, Response}})
      end,
  
      %% Close socket.
  
negative.code: %%
  %% -------------------------------------------------------------------
  
  %% @todo Once we know this works, convert it to a gen_server.
  
  -module(lasp_peer_protocol_server).
  -author("Christopher S. Meiklejohn <christopher.meiklejohn@gmail.com>").
  
  -behaviour(ranch_protocol).
  
  %% ranch_protocol callbacks.
  -export([start_link/4,
           init/4]).
  
  -define(TIMEOUT, 10000).
  
  