THRIFT-3733 Socket timeout improvements
Client: Delphi
Patch: Jens Geyer
Socket timeout improvements, plus some code cleanup and preparation for "new" Delphi sockets.
diff --git a/lib/delphi/test/TestClient.pas b/lib/delphi/test/TestClient.pas
index 144334b..1980dcd 100644
--- a/lib/delphi/test/TestClient.pas
+++ b/lib/delphi/test/TestClient.pas
@@ -490,10 +490,10 @@
on e:Exception do Expect( FALSE, 'Unexpected exception type "'+e.ClassName+'"');
end;
- {
+
if FTransport.IsOpen then FTransport.Close;
FTransport.Open; // re-open connection, server has already closed
- }
+
// case 3: no exception
try