--- a/PipeStr.st Mon Nov 18 22:19:39 1996 +0100
+++ b/PipeStr.st Wed Nov 20 17:03:46 1996 +0100
@@ -403,8 +403,8 @@
OperatingSystem closeFd:execFd.
pid > 0 ifTrue:[
self fileDescriptor:myFd withMode:mode.
- Processor monitorPid:pid action:[ :stat |
- exitStatus := stat.
+ Processor monitorPid:pid action:[ :status |
+ exitStatus := status.
pid := nil.
exitSema signal.
].
@@ -461,6 +461,6 @@
!PipeStream class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Attic/PipeStr.st,v 1.46 1996-09-12 16:09:16 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Attic/PipeStr.st,v 1.47 1996-11-20 16:03:46 cg Exp $'
! !
PipeStream initialize!
--- a/PipeStream.st Mon Nov 18 22:19:39 1996 +0100
+++ b/PipeStream.st Wed Nov 20 17:03:46 1996 +0100
@@ -403,8 +403,8 @@
OperatingSystem closeFd:execFd.
pid > 0 ifTrue:[
self fileDescriptor:myFd withMode:mode.
- Processor monitorPid:pid action:[ :stat |
- exitStatus := stat.
+ Processor monitorPid:pid action:[ :status |
+ exitStatus := status.
pid := nil.
exitSema signal.
].
@@ -461,6 +461,6 @@
!PipeStream class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/PipeStream.st,v 1.46 1996-09-12 16:09:16 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/PipeStream.st,v 1.47 1996-11-20 16:03:46 cg Exp $'
! !
PipeStream initialize!