--- a/AbstrTime.st Thu Apr 25 18:54:31 1996 +0200
+++ b/AbstrTime.st Thu Apr 25 19:02:53 1996 +0200
@@ -38,6 +38,9 @@
This is an abstract class; there are no instances in the system.
It is meant as a home for methods common to time handling classes.
+ [author:]
+ Claus Gittinger
+
[See also:]
Time Date AbsoluteTime
Delay ProcessorScheduler
@@ -381,5 +384,5 @@
!AbstractTime class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Attic/AbstrTime.st,v 1.10 1996-04-25 11:08:00 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Attic/AbstrTime.st,v 1.11 1996-04-25 16:57:49 cg Exp $'
! !
--- a/AbstractTime.st Thu Apr 25 18:54:31 1996 +0200
+++ b/AbstractTime.st Thu Apr 25 19:02:53 1996 +0200
@@ -38,6 +38,9 @@
This is an abstract class; there are no instances in the system.
It is meant as a home for methods common to time handling classes.
+ [author:]
+ Claus Gittinger
+
[See also:]
Time Date AbsoluteTime
Delay ProcessorScheduler
@@ -381,5 +384,5 @@
!AbstractTime class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/AbstractTime.st,v 1.10 1996-04-25 11:08:00 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/AbstractTime.st,v 1.11 1996-04-25 16:57:49 cg Exp $'
! !
--- a/ArithVal.st Thu Apr 25 18:54:31 1996 +0200
+++ b/ArithVal.st Thu Apr 25 19:02:53 1996 +0200
@@ -57,6 +57,9 @@
extract the real reason for the floatException
thus raising DomainErrorSignal in these cases.
+ [author:]
+ Claus Gittinger
+
[See also:]
Number
"
@@ -732,6 +735,6 @@
!ArithmeticValue class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Attic/ArithVal.st,v 1.21 1996-04-25 11:10:03 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Attic/ArithVal.st,v 1.22 1996-04-25 16:59:45 cg Exp $'
! !
ArithmeticValue initialize!
--- a/ArithmeticValue.st Thu Apr 25 18:54:31 1996 +0200
+++ b/ArithmeticValue.st Thu Apr 25 19:02:53 1996 +0200
@@ -57,6 +57,9 @@
extract the real reason for the floatException
thus raising DomainErrorSignal in these cases.
+ [author:]
+ Claus Gittinger
+
[See also:]
Number
"
@@ -732,6 +735,6 @@
!ArithmeticValue class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/ArithmeticValue.st,v 1.21 1996-04-25 11:10:03 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/ArithmeticValue.st,v 1.22 1996-04-25 16:59:45 cg Exp $'
! !
ArithmeticValue initialize!
--- a/CCReader.st Thu Apr 25 18:54:31 1996 +0200
+++ b/CCReader.st Thu Apr 25 19:02:53 1996 +0200
@@ -61,6 +61,12 @@
and keep a reference to that file.
if the image is later moved to another location,
this file should be moved along with it.
+
+ [author:]
+ Claus Gittinger
+
+ [see also:]
+ Class PositionableStream
"
! !
@@ -319,6 +325,6 @@
!ClassCategoryReader class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Attic/CCReader.st,v 1.29 1996-04-13 20:35:19 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Attic/CCReader.st,v 1.30 1996-04-25 16:57:06 cg Exp $'
! !
ClassCategoryReader initialize!
--- a/Character.st Thu Apr 25 18:54:31 1996 +0200
+++ b/Character.st Thu Apr 25 19:02:53 1996 +0200
@@ -59,6 +59,13 @@
... and other classes are hard-wired to always return instances of characters
in some cases (i.e. String>>at:, Symbol>>at: etc.).
Therefore, it may not make sense to create a character-subclass.
+
+ [author:]
+ Claus Gittinger
+
+ [see also:]
+ String TwoByteString
+ StringCollection
"
! !
@@ -833,5 +840,5 @@
!Character class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Character.st,v 1.37 1996-04-23 14:55:00 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Character.st,v 1.38 1996-04-25 16:57:23 cg Exp $'
! !
--- a/ClassCategoryReader.st Thu Apr 25 18:54:31 1996 +0200
+++ b/ClassCategoryReader.st Thu Apr 25 19:02:53 1996 +0200
@@ -61,6 +61,12 @@
and keep a reference to that file.
if the image is later moved to another location,
this file should be moved along with it.
+
+ [author:]
+ Claus Gittinger
+
+ [see also:]
+ Class PositionableStream
"
! !
@@ -319,6 +325,6 @@
!ClassCategoryReader class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/ClassCategoryReader.st,v 1.29 1996-04-13 20:35:19 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/ClassCategoryReader.st,v 1.30 1996-04-25 16:57:06 cg Exp $'
! !
ClassCategoryReader initialize!
--- a/Date.st Thu Apr 25 18:54:31 1996 +0200
+++ b/Date.st Thu Apr 25 19:02:53 1996 +0200
@@ -64,6 +64,14 @@
Date today
(Date today) addDays:
(Date today) subtractDays:
+
+ [author:]
+ Claus Gittinger
+
+ [see also:]
+ Time AbstractTime
+ Filename
+ OperatingSystem
"
! !
@@ -1216,6 +1224,6 @@
!Date class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Date.st,v 1.32 1996-04-19 13:34:32 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Date.st,v 1.33 1996-04-25 16:57:34 cg Exp $'
! !
Date initialize!
--- a/DirStr.st Thu Apr 25 18:54:31 1996 +0200
+++ b/DirStr.st Thu Apr 25 19:02:53 1996 +0200
@@ -351,6 +351,9 @@
Instances of DirectoryStream allow reading a file-directory,
as if it was a stream of filenames.
Basically, its an interface to opendir, readdir and closedir.
+
+ [author:]
+ Claus Gittinger
"
! !
@@ -510,5 +513,5 @@
!DirectoryStream class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Attic/DirStr.st,v 1.29 1996-04-25 08:35:28 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Attic/DirStr.st,v 1.30 1996-04-25 17:01:37 cg Exp $'
! !
--- a/DirectoryStream.st Thu Apr 25 18:54:31 1996 +0200
+++ b/DirectoryStream.st Thu Apr 25 19:02:53 1996 +0200
@@ -351,6 +351,9 @@
Instances of DirectoryStream allow reading a file-directory,
as if it was a stream of filenames.
Basically, its an interface to opendir, readdir and closedir.
+
+ [author:]
+ Claus Gittinger
"
! !
@@ -510,5 +513,5 @@
!DirectoryStream class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/DirectoryStream.st,v 1.29 1996-04-25 08:35:28 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/DirectoryStream.st,v 1.30 1996-04-25 17:01:37 cg Exp $'
! !
--- a/ExtStream.st Thu Apr 25 18:54:31 1996 +0200
+++ b/ExtStream.st Thu Apr 25 19:02:53 1996 +0200
@@ -125,40 +125,40 @@
since I/O from/to files should be fast.
Recovering a snapshot:
- not all streams can be restored to the state they had before - see the implementation of
- reOpen in subclasses for more information.
- For streams sitting on some communication channel (i.e. Pipes and Sockets) you should
- reestablish the stream upon image restart (make someone dependent on ObjectMemory).
- FileStreams are reopened and positioned to their offset they had at snapshot time.
- This may fail, if the file was removed or renamed - or lead to confusion
- if the contents changed in the meantime.
- Therefore, it is a good idea to reopen files and check for these things at restart time.
-
- Instance variables:
-
- filePointer <Integer> the unix FILE*; somehow mapped to an integer
- (notice: not the fd)
- mode <Symbol> #readwrite, #readonly or #writeonly
- buffered <Boolean> true, if buffered (i.e. collects characters - does
- not output immediately)
- binary <Boolean> true if in binary mode (reads bytes instead of chars)
- useCRLF <Boolean> true, if lines should be terminated with crlf instead
- of lf. (i.e. if file is an MSDOS-type file)
- hitEOF <Boolean> true, if EOF was reached
-
- lastErrorNumber <Integer> the value of errno (only valid right after the error -
- updated with next i/o operation)
-
- Class variables:
- Lobby <Registry> keeps track of used ext-streams (to free up FILE*'s)
-
- StreamErrorSignal <Signal> parent of all stream errors (see Stream class)
- InvalidReadSignal <Signal> raised on read from writeonly stream
- InvalidWriteSignal <Signal> raised on write to readonly stream
- InvalidModeSignal <Signal> raised on text I/O with binary-stream
- or binary I/O with text-stream
- OpenErrorSignal <Signal> raised if open fails
- StreamNotOpenSignal <Signal> raised on I/O with non-open stream
+ not all streams can be restored to the state they had before - see the implementation of
+ reOpen in subclasses for more information.
+ For streams sitting on some communication channel (i.e. Pipes and Sockets) you should
+ reestablish the stream upon image restart (make someone dependent on ObjectMemory).
+ FileStreams are reopened and positioned to their offset they had at snapshot time.
+ This may fail, if the file was removed or renamed - or lead to confusion
+ if the contents changed in the meantime.
+ Therefore, it is a good idea to reopen files and check for these things at restart time.
+
+ [Instance variables:]
+
+ filePointer <Integer> the unix FILE*; somehow mapped to an integer
+ (notice: not the fd)
+ mode <Symbol> #readwrite, #readonly or #writeonly
+ buffered <Boolean> true, if buffered (i.e. collects characters - does
+ not output immediately)
+ binary <Boolean> true if in binary mode (reads bytes instead of chars)
+ useCRLF <Boolean> true, if lines should be terminated with crlf instead
+ of lf. (i.e. if file is an MSDOS-type file)
+ hitEOF <Boolean> true, if EOF was reached
+
+ lastErrorNumber <Integer> the value of errno (only valid right after the error -
+ updated with next i/o operation)
+
+ [Class variables:]
+ Lobby <Registry> keeps track of used ext-streams (to free up FILE*'s)
+
+ StreamErrorSignal <Signal> parent of all stream errors (see Stream class)
+ InvalidReadSignal <Signal> raised on read from writeonly stream
+ InvalidWriteSignal <Signal> raised on write to readonly stream
+ InvalidModeSignal <Signal> raised on text I/O with binary-stream
+ or binary I/O with text-stream
+ OpenErrorSignal <Signal> raised if open fails
+ StreamNotOpenSignal <Signal> raised on I/O with non-open stream
Additional notes:
This class is implemented using the underlying stdio-c library package, which
@@ -171,7 +171,10 @@
Also, depending on the system, the stdio library behaves infriendly when signals
occur while reading (for example, timer interrupts) - on real unixes (i.e. BSD) the signal
is handled transparently - on SYS5.3 (i.e. non unixes :-) the read operation returns
- an error and errno is set to EINTR. Thats what the ugly code around all getc-calls is for.
+ an error and errno is set to EINTR.
+ Thats what the ugly code around all getc-calls is for ...
+ Since things get more and more ugly - we will rewrite ExternalStream
+ completely, to NOT use any stdio stuff (and do its buffering itself).
Notice that typical stdio's use a single errno global variable to return an error code,
this was bad design in the stdio lib (right from the very beginning), since its much
@@ -187,6 +190,14 @@
fseek whenever we are about to read after write and vice versa.
Two macros (__READING__ and __WRITING__) have been defined to be used before every
fread/fgetc and fwrite/putc respectively.
+
+ [author:]
+ Claus Gittinger
+ Stefan Vogel (many, many fixes ...)
+
+ [see also:]
+ FileStream Socket PipeStream
+ Filename OperatingSystem
"
! !
@@ -2498,6 +2509,24 @@
filePointer isNil ifTrue:[^ self errorNotOpen].
buffered ifFalse:[^ self errorNotBuffered].
^ self errorWriteOnly
+!
+
+upToEnd
+ "return a collection of the elements up-to the end.
+ Return nil if the stream-end is reached before."
+
+ |answerStream ch|
+
+ answerStream := WriteStream on:(self contentsSpecies new).
+ [self atEnd] whileFalse:[
+ ch := self next.
+ ch notNil ifTrue:[
+ answerStream nextPut:ch
+ ]
+ ].
+ ^ answerStream contents
+
+ "Created: 25.4.1996 / 14:40:31 / cg"
! !
!ExternalStream methodsFor:'reimplemented for speed'!
@@ -3753,6 +3782,6 @@
!ExternalStream class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Attic/ExtStream.st,v 1.98 1996-04-25 08:34:32 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Attic/ExtStream.st,v 1.99 1996-04-25 17:02:53 cg Exp $'
! !
ExternalStream initialize!
--- a/ExternalStream.st Thu Apr 25 18:54:31 1996 +0200
+++ b/ExternalStream.st Thu Apr 25 19:02:53 1996 +0200
@@ -125,40 +125,40 @@
since I/O from/to files should be fast.
Recovering a snapshot:
- not all streams can be restored to the state they had before - see the implementation of
- reOpen in subclasses for more information.
- For streams sitting on some communication channel (i.e. Pipes and Sockets) you should
- reestablish the stream upon image restart (make someone dependent on ObjectMemory).
- FileStreams are reopened and positioned to their offset they had at snapshot time.
- This may fail, if the file was removed or renamed - or lead to confusion
- if the contents changed in the meantime.
- Therefore, it is a good idea to reopen files and check for these things at restart time.
-
- Instance variables:
-
- filePointer <Integer> the unix FILE*; somehow mapped to an integer
- (notice: not the fd)
- mode <Symbol> #readwrite, #readonly or #writeonly
- buffered <Boolean> true, if buffered (i.e. collects characters - does
- not output immediately)
- binary <Boolean> true if in binary mode (reads bytes instead of chars)
- useCRLF <Boolean> true, if lines should be terminated with crlf instead
- of lf. (i.e. if file is an MSDOS-type file)
- hitEOF <Boolean> true, if EOF was reached
-
- lastErrorNumber <Integer> the value of errno (only valid right after the error -
- updated with next i/o operation)
-
- Class variables:
- Lobby <Registry> keeps track of used ext-streams (to free up FILE*'s)
-
- StreamErrorSignal <Signal> parent of all stream errors (see Stream class)
- InvalidReadSignal <Signal> raised on read from writeonly stream
- InvalidWriteSignal <Signal> raised on write to readonly stream
- InvalidModeSignal <Signal> raised on text I/O with binary-stream
- or binary I/O with text-stream
- OpenErrorSignal <Signal> raised if open fails
- StreamNotOpenSignal <Signal> raised on I/O with non-open stream
+ not all streams can be restored to the state they had before - see the implementation of
+ reOpen in subclasses for more information.
+ For streams sitting on some communication channel (i.e. Pipes and Sockets) you should
+ reestablish the stream upon image restart (make someone dependent on ObjectMemory).
+ FileStreams are reopened and positioned to their offset they had at snapshot time.
+ This may fail, if the file was removed or renamed - or lead to confusion
+ if the contents changed in the meantime.
+ Therefore, it is a good idea to reopen files and check for these things at restart time.
+
+ [Instance variables:]
+
+ filePointer <Integer> the unix FILE*; somehow mapped to an integer
+ (notice: not the fd)
+ mode <Symbol> #readwrite, #readonly or #writeonly
+ buffered <Boolean> true, if buffered (i.e. collects characters - does
+ not output immediately)
+ binary <Boolean> true if in binary mode (reads bytes instead of chars)
+ useCRLF <Boolean> true, if lines should be terminated with crlf instead
+ of lf. (i.e. if file is an MSDOS-type file)
+ hitEOF <Boolean> true, if EOF was reached
+
+ lastErrorNumber <Integer> the value of errno (only valid right after the error -
+ updated with next i/o operation)
+
+ [Class variables:]
+ Lobby <Registry> keeps track of used ext-streams (to free up FILE*'s)
+
+ StreamErrorSignal <Signal> parent of all stream errors (see Stream class)
+ InvalidReadSignal <Signal> raised on read from writeonly stream
+ InvalidWriteSignal <Signal> raised on write to readonly stream
+ InvalidModeSignal <Signal> raised on text I/O with binary-stream
+ or binary I/O with text-stream
+ OpenErrorSignal <Signal> raised if open fails
+ StreamNotOpenSignal <Signal> raised on I/O with non-open stream
Additional notes:
This class is implemented using the underlying stdio-c library package, which
@@ -171,7 +171,10 @@
Also, depending on the system, the stdio library behaves infriendly when signals
occur while reading (for example, timer interrupts) - on real unixes (i.e. BSD) the signal
is handled transparently - on SYS5.3 (i.e. non unixes :-) the read operation returns
- an error and errno is set to EINTR. Thats what the ugly code around all getc-calls is for.
+ an error and errno is set to EINTR.
+ Thats what the ugly code around all getc-calls is for ...
+ Since things get more and more ugly - we will rewrite ExternalStream
+ completely, to NOT use any stdio stuff (and do its buffering itself).
Notice that typical stdio's use a single errno global variable to return an error code,
this was bad design in the stdio lib (right from the very beginning), since its much
@@ -187,6 +190,14 @@
fseek whenever we are about to read after write and vice versa.
Two macros (__READING__ and __WRITING__) have been defined to be used before every
fread/fgetc and fwrite/putc respectively.
+
+ [author:]
+ Claus Gittinger
+ Stefan Vogel (many, many fixes ...)
+
+ [see also:]
+ FileStream Socket PipeStream
+ Filename OperatingSystem
"
! !
@@ -2498,6 +2509,24 @@
filePointer isNil ifTrue:[^ self errorNotOpen].
buffered ifFalse:[^ self errorNotBuffered].
^ self errorWriteOnly
+!
+
+upToEnd
+ "return a collection of the elements up-to the end.
+ Return nil if the stream-end is reached before."
+
+ |answerStream ch|
+
+ answerStream := WriteStream on:(self contentsSpecies new).
+ [self atEnd] whileFalse:[
+ ch := self next.
+ ch notNil ifTrue:[
+ answerStream nextPut:ch
+ ]
+ ].
+ ^ answerStream contents
+
+ "Created: 25.4.1996 / 14:40:31 / cg"
! !
!ExternalStream methodsFor:'reimplemented for speed'!
@@ -3753,6 +3782,6 @@
!ExternalStream class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/ExternalStream.st,v 1.98 1996-04-25 08:34:32 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/ExternalStream.st,v 1.99 1996-04-25 17:02:53 cg Exp $'
! !
ExternalStream initialize!
--- a/FileStr.st Thu Apr 25 18:54:31 1996 +0200
+++ b/FileStr.st Thu Apr 25 19:02:53 1996 +0200
@@ -84,6 +84,12 @@
Notice, that on some systems, the standard I/O library has performance
problems when a file is opened for readwrite.
For best results, open files either readonly or writeonly.
+
+ [author:]
+ Claus Gittinger
+
+ [see also:]
+ Filename DirectoryStream PipeStream Socket
"
! !
@@ -666,5 +672,5 @@
!FileStream class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Attic/FileStr.st,v 1.32 1996-04-02 22:01:43 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Attic/FileStr.st,v 1.33 1996-04-25 17:01:24 cg Exp $'
! !
--- a/FileStream.st Thu Apr 25 18:54:31 1996 +0200
+++ b/FileStream.st Thu Apr 25 19:02:53 1996 +0200
@@ -84,6 +84,12 @@
Notice, that on some systems, the standard I/O library has performance
problems when a file is opened for readwrite.
For best results, open files either readonly or writeonly.
+
+ [author:]
+ Claus Gittinger
+
+ [see also:]
+ Filename DirectoryStream PipeStream Socket
"
! !
@@ -666,5 +672,5 @@
!FileStream class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/FileStream.st,v 1.32 1996-04-02 22:01:43 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/FileStream.st,v 1.33 1996-04-25 17:01:24 cg Exp $'
! !
--- a/Float.st Thu Apr 25 18:54:31 1996 +0200
+++ b/Float.st Thu Apr 25 19:02:53 1996 +0200
@@ -69,9 +69,18 @@
of arithmetic operations (even if the operands are subclass-instances).
(It does the float-check by probing a bit in the classes flag instVar).
- Class Variables:
+ [Class Variables:]
LastErrorNumber <Integer> value of errno (after a trig- or other math err)
+
+
+ [see also:]
+ ShortFloat
+ Number
+ FloatArray DoubleArray
+
+ [author:]
+ Claus Gittinger
"
! !
@@ -1081,5 +1090,5 @@
!Float class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Float.st,v 1.38 1996-04-23 14:02:16 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Float.st,v 1.39 1996-04-25 16:59:26 cg Exp $'
! !
--- a/Fraction.st Thu Apr 25 18:54:31 1996 +0200
+++ b/Fraction.st Thu Apr 25 19:02:53 1996 +0200
@@ -38,7 +38,11 @@
Instances of Fraction represent fractional numbers consisting of
a numerator and denominator. Both are themselfes arbitrary precision
integers. Fractions are usually created by dividing Integers using /
- (for exact division)."
+ (for exact division).
+
+ [author:]
+ Claus Gittinger
+"
! !
!Fraction class methodsFor:'initialization'!
@@ -481,6 +485,6 @@
!Fraction class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Fraction.st,v 1.29 1996-04-23 14:02:26 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Fraction.st,v 1.30 1996-04-25 16:59:34 cg Exp $'
! !
Fraction initialize!
--- a/Integer.st Thu Apr 25 18:54:31 1996 +0200
+++ b/Integer.st Thu Apr 25 19:02:53 1996 +0200
@@ -38,15 +38,18 @@
abstract superclass for all integer numbers.
See details in concrete subclasses LargeInteger and SmallInteger.
- Class variables:
+ [Class variables:]
- DefaultDisplayRadix the radix in which integers present their
- displayString (which is used in inspectors)
- If you are to look at many hex numbers, bitmasks
- etc. you may set this to 2 or 16.
- (avoids typing printStringRadix:.. all the time
- - I know - I am lazy ;-). Default is 10.
+ DefaultDisplayRadix the radix in which integers present their
+ displayString (which is used in inspectors)
+ If you are to look at many hex numbers, bitmasks
+ etc. you may set this to 2 or 16.
+ (avoids typing printStringRadix:.. all the time
+ - I know - I am lazy ;-). Default is 10.
+
+ [author:]
+ Claus Gittinger
"
! !
@@ -960,5 +963,5 @@
!Integer class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Integer.st,v 1.37 1996-04-18 09:54:21 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Integer.st,v 1.38 1996-04-25 16:59:56 cg Exp $'
! !
--- a/LPReal.st Thu Apr 25 18:54:31 1996 +0200
+++ b/LPReal.st Thu Apr 25 19:02:53 1996 +0200
@@ -40,6 +40,9 @@
Due to historic reasons, ST/X's Floats are what Doubles are in ST-80.
This may change soon (implementing LPReal is a first step towards this).
+
+ [author:]
+ Claus Gittinger
"
! !
@@ -374,5 +377,5 @@
!LimitedPrecisionReal class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Attic/LPReal.st,v 1.13 1996-04-17 11:35:25 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Attic/LPReal.st,v 1.14 1996-04-25 17:00:05 cg Exp $'
! !
--- a/LargeInt.st Thu Apr 25 18:54:31 1996 +0200
+++ b/LargeInt.st Thu Apr 25 19:02:53 1996 +0200
@@ -58,6 +58,9 @@
In contrast to ST-80, there is only one class for LargeIntegers, keeping
the sign as an instance variable (ST-80 has LargePositiveInteger and
LargeNegativeInteger). This may change.
+
+ [author:]
+ Claus Gittinger
"
! !
@@ -1612,5 +1615,5 @@
!LargeInteger class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Attic/LargeInt.st,v 1.26 1996-04-23 14:01:57 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Attic/LargeInt.st,v 1.27 1996-04-25 16:59:05 cg Exp $'
! !
--- a/LargeInteger.st Thu Apr 25 18:54:31 1996 +0200
+++ b/LargeInteger.st Thu Apr 25 19:02:53 1996 +0200
@@ -58,6 +58,9 @@
In contrast to ST-80, there is only one class for LargeIntegers, keeping
the sign as an instance variable (ST-80 has LargePositiveInteger and
LargeNegativeInteger). This may change.
+
+ [author:]
+ Claus Gittinger
"
! !
@@ -1612,5 +1615,5 @@
!LargeInteger class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/LargeInteger.st,v 1.26 1996-04-23 14:01:57 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/LargeInteger.st,v 1.27 1996-04-25 16:59:05 cg Exp $'
! !
--- a/LimitedPrecisionReal.st Thu Apr 25 18:54:31 1996 +0200
+++ b/LimitedPrecisionReal.st Thu Apr 25 19:02:53 1996 +0200
@@ -40,6 +40,9 @@
Due to historic reasons, ST/X's Floats are what Doubles are in ST-80.
This may change soon (implementing LPReal is a first step towards this).
+
+ [author:]
+ Claus Gittinger
"
! !
@@ -374,5 +377,5 @@
!LimitedPrecisionReal class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/LimitedPrecisionReal.st,v 1.13 1996-04-17 11:35:25 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/LimitedPrecisionReal.st,v 1.14 1996-04-25 17:00:05 cg Exp $'
! !
--- a/Magnitude.st Thu Apr 25 18:54:31 1996 +0200
+++ b/Magnitude.st Thu Apr 25 19:02:53 1996 +0200
@@ -37,6 +37,9 @@
"
This is an abstract class definining common methods for
Objects which can be compared by a kind of greater realation.
+
+ [author:]
+ Claus Gittinger
"
! !
@@ -158,5 +161,5 @@
!Magnitude class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Magnitude.st,v 1.13 1996-04-19 12:58:41 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Magnitude.st,v 1.14 1996-04-25 16:57:17 cg Exp $'
! !
--- a/NPExtStr.st Thu Apr 25 18:54:31 1996 +0200
+++ b/NPExtStr.st Thu Apr 25 19:02:53 1996 +0200
@@ -11,10 +11,10 @@
"
UnboundedExternalStream subclass:#NonPositionableExternalStream
- instanceVariableNames:''
- classVariableNames:'StdInStream StdOutStream StdErrorStream'
- poolDictionaries:''
- category:'Streams-External'
+ instanceVariableNames:''
+ classVariableNames:'StdInStream StdOutStream StdErrorStream'
+ poolDictionaries:''
+ category:'Streams-External'
!
!NonPositionableExternalStream primitiveDefinitions!
@@ -55,11 +55,10 @@
The name of this class is a historical leftover - it should be called
'TTYStream' or similar.
+
+ [author:]
+ Claus Gittinger
"
-!
-
-version
- ^ '$Header: /cvs/stx/stx/libbasic/Attic/NPExtStr.st,v 1.26 1996-04-02 22:02:45 cg Exp $'
! !
!NonPositionableExternalStream class methodsFor:'instance creation'!
@@ -220,3 +219,8 @@
^ false
! !
+!NonPositionableExternalStream class methodsFor:'documentation'!
+
+version
+ ^ '$Header: /cvs/stx/stx/libbasic/Attic/NPExtStr.st,v 1.27 1996-04-25 17:02:24 cg Exp $'
+! !
--- a/NonPositionableExternalStream.st Thu Apr 25 18:54:31 1996 +0200
+++ b/NonPositionableExternalStream.st Thu Apr 25 19:02:53 1996 +0200
@@ -11,10 +11,10 @@
"
UnboundedExternalStream subclass:#NonPositionableExternalStream
- instanceVariableNames:''
- classVariableNames:'StdInStream StdOutStream StdErrorStream'
- poolDictionaries:''
- category:'Streams-External'
+ instanceVariableNames:''
+ classVariableNames:'StdInStream StdOutStream StdErrorStream'
+ poolDictionaries:''
+ category:'Streams-External'
!
!NonPositionableExternalStream primitiveDefinitions!
@@ -55,11 +55,10 @@
The name of this class is a historical leftover - it should be called
'TTYStream' or similar.
+
+ [author:]
+ Claus Gittinger
"
-!
-
-version
- ^ '$Header: /cvs/stx/stx/libbasic/NonPositionableExternalStream.st,v 1.26 1996-04-02 22:02:45 cg Exp $'
! !
!NonPositionableExternalStream class methodsFor:'instance creation'!
@@ -220,3 +219,8 @@
^ false
! !
+!NonPositionableExternalStream class methodsFor:'documentation'!
+
+version
+ ^ '$Header: /cvs/stx/stx/libbasic/NonPositionableExternalStream.st,v 1.27 1996-04-25 17:02:24 cg Exp $'
+! !
--- a/Number.st Thu Apr 25 18:54:31 1996 +0200
+++ b/Number.st Thu Apr 25 19:02:53 1996 +0200
@@ -36,6 +36,9 @@
documentation
"
abstract superclass for all kinds of numbers
+
+ [author:]
+ Claus Gittinger
"
! !
@@ -452,5 +455,5 @@
!Number class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Number.st,v 1.30 1996-04-22 11:02:34 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Number.st,v 1.31 1996-04-25 16:59:17 cg Exp $'
! !
--- a/PeekStr.st Thu Apr 25 18:54:31 1996 +0200
+++ b/PeekStr.st Thu Apr 25 19:02:53 1996 +0200
@@ -11,10 +11,10 @@
"
Stream subclass:#PeekableStream
- instanceVariableNames:''
- classVariableNames:''
- poolDictionaries:''
- category:'Streams'
+ instanceVariableNames:''
+ classVariableNames:''
+ poolDictionaries:''
+ category:'Streams'
!
!PeekableStream class methodsFor:'documentation'!
@@ -38,6 +38,9 @@
abstract superclass for all Stream which support read-ahead
(i.e. peeking) of one element.
Concrete subclasses must implement a peek method.
+
+ [author:]
+ Claus Gittinger
"
! !
@@ -203,5 +206,5 @@
!PeekableStream class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Attic/PeekStr.st,v 1.13 1995-12-07 21:37:35 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Attic/PeekStr.st,v 1.14 1996-04-25 17:01:02 cg Exp $'
! !
--- a/PeekableStream.st Thu Apr 25 18:54:31 1996 +0200
+++ b/PeekableStream.st Thu Apr 25 19:02:53 1996 +0200
@@ -11,10 +11,10 @@
"
Stream subclass:#PeekableStream
- instanceVariableNames:''
- classVariableNames:''
- poolDictionaries:''
- category:'Streams'
+ instanceVariableNames:''
+ classVariableNames:''
+ poolDictionaries:''
+ category:'Streams'
!
!PeekableStream class methodsFor:'documentation'!
@@ -38,6 +38,9 @@
abstract superclass for all Stream which support read-ahead
(i.e. peeking) of one element.
Concrete subclasses must implement a peek method.
+
+ [author:]
+ Claus Gittinger
"
! !
@@ -203,5 +206,5 @@
!PeekableStream class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/PeekableStream.st,v 1.13 1995-12-07 21:37:35 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/PeekableStream.st,v 1.14 1996-04-25 17:01:02 cg Exp $'
! !
--- a/PipeStr.st Thu Apr 25 18:54:31 1996 +0200
+++ b/PipeStr.st Thu Apr 25 19:02:53 1996 +0200
@@ -11,10 +11,10 @@
"
NonPositionableExternalStream subclass:#PipeStream
- instanceVariableNames:'commandString'
- classVariableNames:'BrokenPipeSignal'
- poolDictionaries:''
- category:'Streams-External'
+ instanceVariableNames:'commandString'
+ classVariableNames:'BrokenPipeSignal'
+ poolDictionaries:''
+ category:'Streams-External'
!
!PipeStream primitiveDefinitions!
@@ -152,7 +152,7 @@
For example, to get a stream reading the output of an 'ls -l'
command, a PipeStream can be created with:
- PipeStream readingFrom:'ls -l'
+ PipeStream readingFrom:'ls -l'
the characters of the commands output can be read using the
standard stream messages as next, nextLine etc.
@@ -162,27 +162,26 @@
BrokenPipeSignal.
Thus, to handle this condition correctly, the following code is suggested:
- |p|
- p := PipeStream writingTo:'echo hello'.
- PipeStream brokenPipeSignal handle:[:ex |
- 'broken pipe' printNewline.
- p shutDown.
- ex return
- ] do:[
- p nextPutLine:'oops'.
- 'after write' printNewline.
- p close.
- 'after close' printNewline
- ]
+ |p|
+ p := PipeStream writingTo:'echo hello'.
+ PipeStream brokenPipeSignal handle:[:ex |
+ 'broken pipe' printNewline.
+ p shutDown.
+ ex return
+ ] do:[
+ p nextPutLine:'oops'.
+ 'after write' printNewline.
+ p close.
+ 'after close' printNewline
+ ]
Notice, that if the Stream is buffered, the Signal may occur some time after
the write - or even at close time; to avoid a recursive signal in the exception
handler, a shutDown is useful there.
+
+ [author:]
+ Claus Gittinger
"
-!
-
-version
- ^ '$Header: /cvs/stx/stx/libbasic/Attic/PipeStr.st,v 1.42 1996-04-02 22:04:24 cg Exp $'
! !
!PipeStream class methodsFor:'initialization'!
@@ -402,4 +401,9 @@
^ self openPipeFor:command withMode:'w'
! !
+!PipeStream class methodsFor:'documentation'!
+
+version
+ ^ '$Header: /cvs/stx/stx/libbasic/Attic/PipeStr.st,v 1.43 1996-04-25 17:01:50 cg Exp $'
+! !
PipeStream initialize!
--- a/PipeStream.st Thu Apr 25 18:54:31 1996 +0200
+++ b/PipeStream.st Thu Apr 25 19:02:53 1996 +0200
@@ -11,10 +11,10 @@
"
NonPositionableExternalStream subclass:#PipeStream
- instanceVariableNames:'commandString'
- classVariableNames:'BrokenPipeSignal'
- poolDictionaries:''
- category:'Streams-External'
+ instanceVariableNames:'commandString'
+ classVariableNames:'BrokenPipeSignal'
+ poolDictionaries:''
+ category:'Streams-External'
!
!PipeStream primitiveDefinitions!
@@ -152,7 +152,7 @@
For example, to get a stream reading the output of an 'ls -l'
command, a PipeStream can be created with:
- PipeStream readingFrom:'ls -l'
+ PipeStream readingFrom:'ls -l'
the characters of the commands output can be read using the
standard stream messages as next, nextLine etc.
@@ -162,27 +162,26 @@
BrokenPipeSignal.
Thus, to handle this condition correctly, the following code is suggested:
- |p|
- p := PipeStream writingTo:'echo hello'.
- PipeStream brokenPipeSignal handle:[:ex |
- 'broken pipe' printNewline.
- p shutDown.
- ex return
- ] do:[
- p nextPutLine:'oops'.
- 'after write' printNewline.
- p close.
- 'after close' printNewline
- ]
+ |p|
+ p := PipeStream writingTo:'echo hello'.
+ PipeStream brokenPipeSignal handle:[:ex |
+ 'broken pipe' printNewline.
+ p shutDown.
+ ex return
+ ] do:[
+ p nextPutLine:'oops'.
+ 'after write' printNewline.
+ p close.
+ 'after close' printNewline
+ ]
Notice, that if the Stream is buffered, the Signal may occur some time after
the write - or even at close time; to avoid a recursive signal in the exception
handler, a shutDown is useful there.
+
+ [author:]
+ Claus Gittinger
"
-!
-
-version
- ^ '$Header: /cvs/stx/stx/libbasic/PipeStream.st,v 1.42 1996-04-02 22:04:24 cg Exp $'
! !
!PipeStream class methodsFor:'initialization'!
@@ -402,4 +401,9 @@
^ self openPipeFor:command withMode:'w'
! !
+!PipeStream class methodsFor:'documentation'!
+
+version
+ ^ '$Header: /cvs/stx/stx/libbasic/PipeStream.st,v 1.43 1996-04-25 17:01:50 cg Exp $'
+! !
PipeStream initialize!
--- a/PosStream.st Thu Apr 25 18:54:31 1996 +0200
+++ b/PosStream.st Thu Apr 25 19:02:53 1996 +0200
@@ -39,6 +39,9 @@
The PositionableStream class also adds methods for source-chunk reading
and writing, and for filing-in/out of source code.
This is an abstract class.
+
+ [author:]
+ Claus Gittinger
"
! !
@@ -559,6 +562,6 @@
!PositionableStream class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Attic/PosStream.st,v 1.41 1996-03-07 18:32:41 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Attic/PosStream.st,v 1.42 1996-04-25 17:00:36 cg Exp $'
! !
PositionableStream initialize!
--- a/PositionableStream.st Thu Apr 25 18:54:31 1996 +0200
+++ b/PositionableStream.st Thu Apr 25 19:02:53 1996 +0200
@@ -39,6 +39,9 @@
The PositionableStream class also adds methods for source-chunk reading
and writing, and for filing-in/out of source code.
This is an abstract class.
+
+ [author:]
+ Claus Gittinger
"
! !
@@ -559,6 +562,6 @@
!PositionableStream class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/PositionableStream.st,v 1.41 1996-03-07 18:32:41 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/PositionableStream.st,v 1.42 1996-04-25 17:00:36 cg Exp $'
! !
PositionableStream initialize!
--- a/RWStream.st Thu Apr 25 18:54:31 1996 +0200
+++ b/RWStream.st Thu Apr 25 19:02:53 1996 +0200
@@ -10,8 +10,6 @@
hereby transferred.
"
-'From Smalltalk/X, Version:2.10.8 on 6-feb-1996 at 15:31:35' !
-
WriteStream subclass:#ReadWriteStream
instanceVariableNames:''
classVariableNames:''
@@ -43,10 +41,14 @@
of good use in smalltalk).
Claus:
- I personally find the ReadStream - WriteStream - ReadWriteStream
- organization brain-damaged. It would be better to have an attribute
- (such as readOnly / writeOnly / readWrite) in an InternalStream subclass
- of Stream ...
+ I personally find the ReadStream - WriteStream - ReadWriteStream
+ organization brain-damaged. It would be better to have an attribute
+ (such as readOnly / writeOnly / readWrite) in an InternalStream subclass
+ of Stream ...
+
+ [author:]
+ Claus Gittinger
+
"
! !
@@ -101,5 +103,5 @@
!ReadWriteStream class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Attic/RWStream.st,v 1.16 1996-02-19 15:07:27 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Attic/RWStream.st,v 1.17 1996-04-25 17:00:25 cg Exp $'
! !
--- a/ReadStr.st Thu Apr 25 18:54:31 1996 +0200
+++ b/ReadStr.st Thu Apr 25 19:02:53 1996 +0200
@@ -10,8 +10,6 @@
hereby transferred.
"
-'From Smalltalk/X, Version:2.10.8 on 6-feb-1996 at 15:31:28' !
-
PositionableStream subclass:#ReadStream
instanceVariableNames:''
classVariableNames:''
@@ -38,6 +36,10 @@
documentation
"
ReadStream defines protocol for reading streamwise over collections.
+
+ [author:]
+ Claus Gittinger
+
"
! !
@@ -540,5 +542,5 @@
!ReadStream class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Attic/ReadStr.st,v 1.25 1996-04-06 13:22:37 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Attic/ReadStr.st,v 1.26 1996-04-25 17:00:45 cg Exp $'
! !
--- a/ReadStream.st Thu Apr 25 18:54:31 1996 +0200
+++ b/ReadStream.st Thu Apr 25 19:02:53 1996 +0200
@@ -10,8 +10,6 @@
hereby transferred.
"
-'From Smalltalk/X, Version:2.10.8 on 6-feb-1996 at 15:31:28' !
-
PositionableStream subclass:#ReadStream
instanceVariableNames:''
classVariableNames:''
@@ -38,6 +36,10 @@
documentation
"
ReadStream defines protocol for reading streamwise over collections.
+
+ [author:]
+ Claus Gittinger
+
"
! !
@@ -540,5 +542,5 @@
!ReadStream class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/ReadStream.st,v 1.25 1996-04-06 13:22:37 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/ReadStream.st,v 1.26 1996-04-25 17:00:45 cg Exp $'
! !
--- a/ReadWriteStream.st Thu Apr 25 18:54:31 1996 +0200
+++ b/ReadWriteStream.st Thu Apr 25 19:02:53 1996 +0200
@@ -10,8 +10,6 @@
hereby transferred.
"
-'From Smalltalk/X, Version:2.10.8 on 6-feb-1996 at 15:31:35' !
-
WriteStream subclass:#ReadWriteStream
instanceVariableNames:''
classVariableNames:''
@@ -43,10 +41,14 @@
of good use in smalltalk).
Claus:
- I personally find the ReadStream - WriteStream - ReadWriteStream
- organization brain-damaged. It would be better to have an attribute
- (such as readOnly / writeOnly / readWrite) in an InternalStream subclass
- of Stream ...
+ I personally find the ReadStream - WriteStream - ReadWriteStream
+ organization brain-damaged. It would be better to have an attribute
+ (such as readOnly / writeOnly / readWrite) in an InternalStream subclass
+ of Stream ...
+
+ [author:]
+ Claus Gittinger
+
"
! !
@@ -101,5 +103,5 @@
!ReadWriteStream class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/ReadWriteStream.st,v 1.16 1996-02-19 15:07:27 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/ReadWriteStream.st,v 1.17 1996-04-25 17:00:25 cg Exp $'
! !
--- a/SFloat.st Thu Apr 25 18:54:31 1996 +0200
+++ b/SFloat.st Thu Apr 25 19:02:53 1996 +0200
@@ -60,6 +60,9 @@
thus mixed mode arithmetic will always coerce them, effectively slowing things down).
This may be changed, to use a flag bit in the class.
+
+ [author:]
+ Claus Gittinger
"
! !
@@ -544,5 +547,5 @@
!ShortFloat class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Attic/SFloat.st,v 1.5 1996-04-23 14:02:41 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Attic/SFloat.st,v 1.6 1996-04-25 17:00:09 cg Exp $'
! !
--- a/ShortFloat.st Thu Apr 25 18:54:31 1996 +0200
+++ b/ShortFloat.st Thu Apr 25 19:02:53 1996 +0200
@@ -60,6 +60,9 @@
thus mixed mode arithmetic will always coerce them, effectively slowing things down).
This may be changed, to use a flag bit in the class.
+
+ [author:]
+ Claus Gittinger
"
! !
@@ -544,5 +547,5 @@
!ShortFloat class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/ShortFloat.st,v 1.5 1996-04-23 14:02:41 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/ShortFloat.st,v 1.6 1996-04-25 17:00:09 cg Exp $'
! !
--- a/SmallInt.st Thu Apr 25 18:54:31 1996 +0200
+++ b/SmallInt.st Thu Apr 25 19:02:53 1996 +0200
@@ -49,6 +49,9 @@
If you really need this kind of thing, create a subclass of Integer,
with an instance variable holding the value.
+
+ [author:]
+ Claus Gittinger
"
! !
@@ -2014,5 +2017,5 @@
!SmallInteger class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Attic/SmallInt.st,v 1.50 1996-04-23 14:01:36 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Attic/SmallInt.st,v 1.51 1996-04-25 16:58:46 cg Exp $'
! !
--- a/SmallInteger.st Thu Apr 25 18:54:31 1996 +0200
+++ b/SmallInteger.st Thu Apr 25 19:02:53 1996 +0200
@@ -49,6 +49,9 @@
If you really need this kind of thing, create a subclass of Integer,
with an instance variable holding the value.
+
+ [author:]
+ Claus Gittinger
"
! !
@@ -2014,5 +2017,5 @@
!SmallInteger class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/SmallInteger.st,v 1.50 1996-04-23 14:01:36 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/SmallInteger.st,v 1.51 1996-04-25 16:58:46 cg Exp $'
! !
--- a/Stream.st Thu Apr 25 18:54:31 1996 +0200
+++ b/Stream.st Thu Apr 25 19:02:53 1996 +0200
@@ -10,8 +10,6 @@
hereby transferred.
"
-'From Smalltalk/X, Version:2.10.8 on 6-feb-1996 at 15:31:21' !
-
Object subclass:#Stream
instanceVariableNames:'signalAtEnd'
classVariableNames:'StreamErrorSignal PositionErrorSignal ReadErrorSignal
@@ -42,24 +40,27 @@
See concrete subclasses for more detail.
Subclasses should (at least) implement:
- #next (if readable)
- #nextPut: (if writable)
- #contents
- #atEnd
- #isReadable
- #isWritable
+ #next (if readable)
+ #nextPut: (if writable)
+ #contents
+ #atEnd
+ #isReadable
+ #isWritable
+
+ [Class variables:]
+ StreamErrorSignal <Signal> parent of all stream errors
- Class variables:
- StreamErrorSignal <Signal> parent of all stream errors
+ PositionErrorSignal <Signal> position attemted on a stream
+ which does not support positioning
- PositionErrorSignal <Signal> position attemted on a stream
- which does not support positioning
+ ReadErrorSignal <Signal> raised on read errors
- ReadErrorSignal <Signal> raised on read errors
+ WriteErrorSignal <Signal> raised on write errors
- WriteErrorSignal <Signal> raised on write errors
+ EndOfStreamSignal <Signal> raised at end of stream
- EndOfStreamSignal <Signal> raised at end of stream
+ [author:]
+ Claus Gittinger
"
! !
@@ -1046,6 +1047,6 @@
!Stream class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Stream.st,v 1.35 1996-03-23 17:22:23 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Stream.st,v 1.36 1996-04-25 17:00:54 cg Exp $'
! !
Stream initialize!
--- a/Time.st Thu Apr 25 18:54:31 1996 +0200
+++ b/Time.st Thu Apr 25 19:02:53 1996 +0200
@@ -55,6 +55,13 @@
(Delay forSeconds:10) wait.
t2 := Time now.
t2 - t1
+
+ [author:]
+ Claus Gittinger
+
+ [see also:]
+ Date OperatingSystem
+ Filename
"
! !
@@ -357,5 +364,5 @@
!Time class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Time.st,v 1.25 1996-04-19 13:34:50 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Time.st,v 1.26 1996-04-25 16:57:44 cg Exp $'
! !
--- a/UnbndExtStr.st Thu Apr 25 18:54:31 1996 +0200
+++ b/UnbndExtStr.st Thu Apr 25 19:02:53 1996 +0200
@@ -11,10 +11,10 @@
"
ExternalStream subclass:#UnboundedExternalStream
- instanceVariableNames:''
- classVariableNames:''
- poolDictionaries:''
- category:'Streams-External'
+ instanceVariableNames:''
+ classVariableNames:''
+ poolDictionaries:''
+ category:'Streams-External'
!
!UnboundedExternalStream class methodsFor:'documentation'!
@@ -38,11 +38,10 @@
This class provides common protocol for all external streams which are
unbound in size (i.e. have no end). Examples of these are PipeStream,
Sockets, TTYStreams etc.
+
+ [author:]
+ Claus Gittinger
"
-!
-
-version
- ^ '$Header: /cvs/stx/stx/libbasic/Attic/UnbndExtStr.st,v 1.7 1995-11-23 01:52:35 cg Exp $'
! !
!UnboundedExternalStream methodsFor:'redefind basic'!
@@ -65,3 +64,8 @@
self shouldNotImplement
! !
+!UnboundedExternalStream class methodsFor:'documentation'!
+
+version
+ ^ '$Header: /cvs/stx/stx/libbasic/Attic/UnbndExtStr.st,v 1.8 1996-04-25 17:02:20 cg Exp $'
+! !
--- a/UnboundExternalStream.st Thu Apr 25 18:54:31 1996 +0200
+++ b/UnboundExternalStream.st Thu Apr 25 19:02:53 1996 +0200
@@ -11,10 +11,10 @@
"
ExternalStream subclass:#UnboundedExternalStream
- instanceVariableNames:''
- classVariableNames:''
- poolDictionaries:''
- category:'Streams-External'
+ instanceVariableNames:''
+ classVariableNames:''
+ poolDictionaries:''
+ category:'Streams-External'
!
!UnboundedExternalStream class methodsFor:'documentation'!
@@ -38,11 +38,10 @@
This class provides common protocol for all external streams which are
unbound in size (i.e. have no end). Examples of these are PipeStream,
Sockets, TTYStreams etc.
+
+ [author:]
+ Claus Gittinger
"
-!
-
-version
- ^ '$Header: /cvs/stx/stx/libbasic/Attic/UnboundExternalStream.st,v 1.7 1995-11-23 01:52:35 cg Exp $'
! !
!UnboundedExternalStream methodsFor:'redefind basic'!
@@ -65,3 +64,8 @@
self shouldNotImplement
! !
+!UnboundedExternalStream class methodsFor:'documentation'!
+
+version
+ ^ '$Header: /cvs/stx/stx/libbasic/Attic/UnboundExternalStream.st,v 1.8 1996-04-25 17:02:20 cg Exp $'
+! !
--- a/UnboundedExternalStream.st Thu Apr 25 18:54:31 1996 +0200
+++ b/UnboundedExternalStream.st Thu Apr 25 19:02:53 1996 +0200
@@ -11,10 +11,10 @@
"
ExternalStream subclass:#UnboundedExternalStream
- instanceVariableNames:''
- classVariableNames:''
- poolDictionaries:''
- category:'Streams-External'
+ instanceVariableNames:''
+ classVariableNames:''
+ poolDictionaries:''
+ category:'Streams-External'
!
!UnboundedExternalStream class methodsFor:'documentation'!
@@ -38,11 +38,10 @@
This class provides common protocol for all external streams which are
unbound in size (i.e. have no end). Examples of these are PipeStream,
Sockets, TTYStreams etc.
+
+ [author:]
+ Claus Gittinger
"
-!
-
-version
- ^ '$Header: /cvs/stx/stx/libbasic/UnboundedExternalStream.st,v 1.7 1995-11-23 01:52:35 cg Exp $'
! !
!UnboundedExternalStream methodsFor:'redefind basic'!
@@ -65,3 +64,8 @@
self shouldNotImplement
! !
+!UnboundedExternalStream class methodsFor:'documentation'!
+
+version
+ ^ '$Header: /cvs/stx/stx/libbasic/UnboundedExternalStream.st,v 1.8 1996-04-25 17:02:20 cg Exp $'
+! !
--- a/WriteStr.st Thu Apr 25 18:54:31 1996 +0200
+++ b/WriteStr.st Thu Apr 25 19:02:53 1996 +0200
@@ -11,10 +11,10 @@
"
PositionableStream subclass:#WriteStream
- instanceVariableNames:''
- classVariableNames:''
- poolDictionaries:''
- category:'Streams'
+ instanceVariableNames:''
+ classVariableNames:''
+ poolDictionaries:''
+ category:'Streams'
!
!WriteStream class methodsFor:'documentation'!
@@ -40,6 +40,9 @@
Collections which cannot grow easily are for example: Array, ByteArray and String.
Thus it is slightly incompatible to ST-80 since 'aStream contents' does
not always return the original collection. This may change.
+
+ [author:]
+ Claus Gittinger
"
! !
@@ -311,5 +314,5 @@
!WriteStream class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Attic/WriteStr.st,v 1.25 1996-04-02 22:14:55 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Attic/WriteStr.st,v 1.26 1996-04-25 17:00:29 cg Exp $'
! !
--- a/WriteStream.st Thu Apr 25 18:54:31 1996 +0200
+++ b/WriteStream.st Thu Apr 25 19:02:53 1996 +0200
@@ -11,10 +11,10 @@
"
PositionableStream subclass:#WriteStream
- instanceVariableNames:''
- classVariableNames:''
- poolDictionaries:''
- category:'Streams'
+ instanceVariableNames:''
+ classVariableNames:''
+ poolDictionaries:''
+ category:'Streams'
!
!WriteStream class methodsFor:'documentation'!
@@ -40,6 +40,9 @@
Collections which cannot grow easily are for example: Array, ByteArray and String.
Thus it is slightly incompatible to ST-80 since 'aStream contents' does
not always return the original collection. This may change.
+
+ [author:]
+ Claus Gittinger
"
! !
@@ -311,5 +314,5 @@
!WriteStream class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/WriteStream.st,v 1.25 1996-04-02 22:14:55 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/WriteStream.st,v 1.26 1996-04-25 17:00:29 cg Exp $'
! !