gistfile1.cpp

  void handle_read(const sys::error_code& error,
		   size_t bytes_transferred)
  {
    if(error)
    {
      delete this;
      return;
    }

    async_write(
      socket_,
      buffer(data_, bytes_transferred),
      [this](const sys::error_code& error, size_t bytes_transferred)
      {
	if(error)
	{
	  delete this;
	  return;
	}
	socket_.async_read_some(
	  buffer(data_, max_length),
	  bind(&session::handle_read, this,
	       placeholders::error,
	       placeholders::bytes_transferred));
      });
  }