ExternalStream.st
changeset 1469 570ef7f8667b
parent 1464 6d533b5e5de3
child 1478 aae07192b7d1
equal deleted inserted replaced
1468:cb156455b046 1469:570ef7f8667b
     7  inclusion of the above copyright notice.   This software may not
     7  inclusion of the above copyright notice.   This software may not
     8  be provided or otherwise made available to, or used by, any
     8  be provided or otherwise made available to, or used by, any
     9  other person.  No title to or ownership of the software is
     9  other person.  No title to or ownership of the software is
    10  hereby transferred.
    10  hereby transferred.
    11 "
    11 "
    12 
       
    13 'From Smalltalk/X, Version:2.10.9 on 13-jun-1996 at 01:14:41'                   !
       
    14 
    12 
    15 ReadWriteStream subclass:#ExternalStream
    13 ReadWriteStream subclass:#ExternalStream
    16 	instanceVariableNames:'filePointer mode buffered binary useCRLF hitEOF didWrite
    14 	instanceVariableNames:'filePointer mode buffered binary useCRLF hitEOF didWrite
    17 		lastErrorNumber'
    15 		lastErrorNumber'
    18 	classVariableNames:'Lobby LastErrorNumber InvalidReadSignal InvalidWriteSignal
    16 	classVariableNames:'Lobby LastErrorNumber InvalidReadSignal InvalidWriteSignal
   376     Lobby do:[:aFileStream |
   374     Lobby do:[:aFileStream |
   377 	aFileStream reOpen
   375 	aFileStream reOpen
   378     ]
   376     ]
   379 !
   377 !
   380 
   378 
   381 update:something
   379 update:something with:aParameter from:changedObject
   382     "have to reopen files when returning from snapshot"
   380     "have to reopen files when returning from snapshot"
   383 
   381 
   384     something == #returnFromSnapshot ifTrue:[
   382     something == #returnFromSnapshot ifTrue:[
   385 	self reOpenFiles
   383         self reOpenFiles
   386     ]
   384     ]
       
   385 
       
   386     "Created: 15.6.1996 / 15:19:59 / cg"
   387 ! !
   387 ! !
   388 
   388 
   389 !ExternalStream class methodsFor:'instance creation'!
   389 !ExternalStream class methodsFor:'instance creation'!
   390 
   390 
   391 forFileDescriptor:aFileDescriptor mode:mode
   391 forFileDescriptor:aFileDescriptor mode:mode
  3509 ! !
  3509 ! !
  3510 
  3510 
  3511 !ExternalStream class methodsFor:'documentation'!
  3511 !ExternalStream class methodsFor:'documentation'!
  3512 
  3512 
  3513 version
  3513 version
  3514     ^ '$Header: /cvs/stx/stx/libbasic/ExternalStream.st,v 1.104 1996-06-13 00:10:22 stefan Exp $'
  3514     ^ '$Header: /cvs/stx/stx/libbasic/ExternalStream.st,v 1.105 1996-06-15 13:20:43 cg Exp $'
  3515 ! !
  3515 ! !
  3516 ExternalStream initialize!
  3516 ExternalStream initialize!