equal
deleted
inserted
replaced
684 nullOutput close |
684 nullOutput close |
685 ]. |
685 ]. |
686 |
686 |
687 result ifTrue:[ |
687 result ifTrue:[ |
688 "successfull creation of subprocesss" |
688 "successfull creation of subprocesss" |
689 self setFileHandle:myPipeEnd fileHandle mode:rwMode. |
689 handle := myPipeEnd handle. |
|
690 handleType := myPipeEnd handleType. |
690 myPipeEnd unregisterForFinalization. "make sure filedesciptor is not closed by finalizer" |
691 myPipeEnd unregisterForFinalization. "make sure filedesciptor is not closed by finalizer" |
691 myPipeEnd := nil. |
692 myPipeEnd := nil. |
692 handleType := #pipeFilePointer. |
|
693 ] ifFalse:[ |
693 ] ifFalse:[ |
694 "the pipe open failed for some reason ... |
694 "the pipe open failed for some reason ... |
695 ... this may be either due to an invalid command string, |
695 ... this may be either due to an invalid command string, |
696 or due to the system running out of memory (when forking |
696 or due to the system running out of memory (when forking |
697 the unix process)" |
697 the unix process)" |