| commit | 06045cf8d962b83ea53a6ea4a6e3cabe3547e666 | [log] [tgz] |
|---|---|---|
| author | Jens Geyer <jensg@apache.org> | Wed Mar 27 20:26:25 2013 +0200 |
| committer | Jens Geyer <jensg@apache.org> | Wed Mar 27 20:26:25 2013 +0200 |
| tree | 5165dce091dab0b41c1c021ad489371e312c43b3 | |
| parent | 3a931b50d906db8099d3819a4c8c89328bb92a61 [diff] [blame] |
THRIFT-1880 Make named pipes server work asynchronously (overlapped) to allow for clean server stops Patch: Jens Geyer
diff --git a/lib/delphi/test/server.dpr b/lib/delphi/test/server.dpr index 5fad6eb..ca485af 100644 --- a/lib/delphi/test/server.dpr +++ b/lib/delphi/test/server.dpr
@@ -54,7 +54,7 @@ args[i-1] := arg; end; TTestServer.Execute( args ); - Readln; + Writeln('Press ENTER to close ... '); Readln; except on E: Exception do Writeln(E.ClassName, ': ', E.Message);