NonPositionableExternalStream.st
changeset 21239 9070e0ebd499
parent 21230 9b7a6559527b
child 21285 7770135c2b54
child 21361 a63984f4eceb
equal deleted inserted replaced
21238:3ee68e64910a 21239:9070e0ebd499
     1 "{ Encoding: utf8 }"
       
     2 
       
     3 "
     1 "
     4  COPYRIGHT (c) 1989 by Claus Gittinger
     2  COPYRIGHT (c) 1989 by Claus Gittinger
     5 	      All Rights Reserved
     3 	      All Rights Reserved
     6 
     4 
     7  This software is furnished under a license and may be used
     5  This software is furnished under a license and may be used
   499 closeFile
   497 closeFile
   500     |semasToSignal|
   498     |semasToSignal|
   501 
   499 
   502     handle notNil ifTrue:[
   500     handle notNil ifTrue:[
   503         "make sure, that no select is performed on closed file descriptors"
   501         "make sure, that no select is performed on closed file descriptors"
   504         semasToSignal := Processor disableFd:self fileDescriptor doSignal:false.
   502         semasToSignal := Processor disableFd:self fileHandle doSignal:false.
   505         super closeFile.
   503         super closeFile.
   506 
   504 
   507         "tell the waiters that they must not wait any longer"
   505         "tell the waiters that they must not wait any longer"
   508         semasToSignal do:[:eachSema|
   506         semasToSignal do:[:eachSema|
   509             eachSema signalForAll.
   507             eachSema signalForAll.