anchor.diff:      %% error_logger:info_msg("tSocket: wrote ~p~n", [Str]),
   
       %% error_logger:info_msg("WRITE |~p| (~p)", [Str,Val]),
  -    
  +
       case Val of
  -	{error, _} ->
  -	    throw(tTransportException:new(?tTransportException_NOT_OPEN, "in write"));
  -	ok ->
  -	    {ok, This}
  +        {error, _} ->
  +            throw(tTransportException:new(?tTransportException_NOT_OPEN, "in write"));
  +        ok ->
  +            {ok, This}
       end.
   
   read(This, Sz) ->
       Handle = oop:get(This, handle),
       case gen_tcp:recv(Handle, Sz) of
  -	{ok, []} ->
  -	    Host = oop:get(This, host),
  -	    Port = oop:get(This, port),
  -	    throw(tTransportException:new(?tTransportException_UNKNOWN, "TSocket: Could not read " ++ Sz ++ "bytes from " ++ Host ++ ":" ++ Port));
  -	{ok, Data} ->
  -	    %% DEBUG
  -	    %% io:format("tSocket: read ~p~n", [Data]),
  -	    Data;
  -	{error, Error} ->
  -	    exit(tTransportException:new(?tTransportException_NOT_OPEN, "in tSocket:read/2: gen_tcp:recv"))
  -	end.
  -	    
  +        {ok, []} ->
  +            Host = oop:get(This, host),
  +            Port = oop:get(This, port),
  +            throw(tTransportException:new(?tTransportException_UNKNOWN, "TSocket: Could not read " ++ Sz ++ "bytes from " ++ Host ++ ":" ++ Port));
  +        {ok, Data} ->
  +            %% DEBUG
  +            ?INFO("tSocket: read ~p", [Data]),
  +            Data;
  +        {error, Error} ->
  +            exit(tTransportException:new(?tTransportException_NOT_OPEN, "in tSocket:read/2: gen_tcp:recv"))
  +    end.
  +
   effectful_close(This) ->
       case oop:get(This, handle) of
  -	nil ->
  -	    {ok, This};
  -	Handle -> 
  -	    gen_tcp:close(Handle),
  -	    {ok, oop:set(This, handle, nil)}
  +        nil ->
  +            {ok, This};
  +        Handle ->
  +            gen_tcp:close(Handle),
  +            {ok, oop:set(This, handle, nil)}
       end.
  
positive.code: 
  -include("thrift.hrl").
  -include("transport/tTransportException.hrl").
  % -include("transport/tTransport.hrl").
  -include("transport/tSocket.hrl").
  
  -behavior(oop).
  
negative.code: ?DEFINE_ATTR(host);
  ?DEFINE_ATTR(port);
  ?DEFINE_ATTR(handle).
  
  %%%
  %%% behavior callbacks
  %%%
  
  %%% super() -> SuperModule = atom()
  %%%             |  none
  
  