diff -r a005e97d261e -r 6c03b347369f ExtStream.st --- a/ExtStream.st Sat Sep 16 19:14:32 1995 +0200 +++ b/ExtStream.st Sun Sep 17 19:57:55 1995 +0200 @@ -24,7 +24,7 @@ COPYRIGHT (c) 1988 by Claus Gittinger All Rights Reserved -$Header: /cvs/stx/stx/libbasic/Attic/ExtStream.st,v 1.52 1995-09-16 17:13:10 claus Exp $ +$Header: /cvs/stx/stx/libbasic/Attic/ExtStream.st,v 1.53 1995-09-17 17:56:12 claus Exp $ '! !ExternalStream primitiveDefinitions! @@ -91,7 +91,7 @@ version " -$Header: /cvs/stx/stx/libbasic/Attic/ExtStream.st,v 1.52 1995-09-16 17:13:10 claus Exp $ +$Header: /cvs/stx/stx/libbasic/Attic/ExtStream.st,v 1.53 1995-09-17 17:56:12 claus Exp $ " ! @@ -535,6 +535,13 @@ !ExternalStream methodsFor:'queries'! +isExternalStream + "return true, if the receiver is some kind of externalStream; + true is returned here - the method redefined from Object." + + ^ true +! + isReadable "return true, if this stream can be read from" @@ -2997,7 +3004,7 @@ if (_INST(binary) != true) { f = MKFD(fp); - if (feof(f)) { + if (feof(f)) { _INST(hitEOF) = true; RETURN ( nil ); }