--- a/ExternalStream.st	Sat Dec 18 01:15:58 1993 +0100
+++ b/ExternalStream.st	Mon Dec 20 00:40:23 1993 +0100
@@ -22,7 +22,7 @@
 COPYRIGHT (c) 1988 by Claus Gittinger
               All Rights Reserved
 
-$Header: /cvs/stx/stx/libbasic/ExternalStream.st,v 1.8 1993-12-18 00:13:54 claus Exp $
+$Header: /cvs/stx/stx/libbasic/ExternalStream.st,v 1.9 1993-12-19 23:39:56 claus Exp $
 
 written 88 by claus
 '!
@@ -2033,7 +2033,7 @@
 
     [OperatingSystem readCheck:fd] whileFalse:[
         Processor enableSemaphore:sema onInput:fd.
-        Processor currentProcess state:#ioWait.
+        Processor activeProcess state:#ioWait.
         sema wait.
         Processor disableSemaphore:sema
     ]
@@ -2052,7 +2052,7 @@
 
     [OperatingSystem writeCheck:fd] whileFalse:[
         Processor enableSemaphore:sema onOutput:fd.
-        Processor currentProcess state:#ioWait.
+        Processor activeProcess state:#ioWait.
         sema wait.
         Processor disableSemaphore:sema
     ]