Removed another WIN32... Additional notes into the psuedo code for LINUX/OSX STDIO redirection.

This commit is contained in:
mysticbbs 2012-02-18 03:09:14 -05:00
parent dfa5013f4f
commit 494e429671
1 changed files with 7 additions and 3 deletions

View File

@ -7,8 +7,9 @@ Interface
Uses Uses
{$IFDEF UNIX} {$IFDEF UNIX}
Unix, Unix,
//TPROCESS unit?
{$ENDIF} {$ENDIF}
{$IFDEF WIN32} {$IFDEF WINDOWS}
Windows, Windows,
{$ENDIF} {$ENDIF}
m_Strings, m_Strings,
@ -122,11 +123,14 @@ Begin
// //
// while processGoing do begin // while processGoing do begin
// case waitEvent(Input, output, close, wait INFINITY) // case waitEvent(Input, output, close, wait INFINITY)
// input : push input to STDIO handle? // input : push input from client to STDIO handle
// output : push output to client class // output : push output from STDIO to client class
// close : break; // close : break;
// end // end
// it seems there might be a TProcess in FCL with FPC that can do this
// already... research!
NI.Busy := False; NI.Busy := False;
NI.IP := ''; NI.IP := '';
NI.User := ''; NI.User := '';