ExtStream.st
changeset 820 6d934f5d6cbc
parent 791 b1c153b1c719
child 826 b271ea453f6a
--- a/ExtStream.st	Sat Dec 23 19:57:33 1995 +0100
+++ b/ExtStream.st	Sat Dec 23 20:05:00 1995 +0100
@@ -12,10 +12,10 @@
 
 ReadWriteStream subclass:#ExternalStream
 	 instanceVariableNames:'filePointer mode buffered binary useCRLF hitEOF didWrite
-                lastErrorNumber'
-	 classVariableNames:'Lobby LastErrorNumber ReadErrorSignal WriteErrorSignal
-                InvalidReadSignal InvalidWriteSignal InvalidModeSignal
-                OpenErrorSignal StreamNotOpenSignal'
+		lastErrorNumber'
+	 classVariableNames:'Lobby LastErrorNumber 
+		InvalidReadSignal InvalidWriteSignal InvalidModeSignal
+		OpenErrorSignal StreamNotOpenSignal'
 	 poolDictionaries:''
 	 category:'Streams-External'
 !
@@ -137,8 +137,6 @@
 	Lobby           <Registry>      keeps track of used ext-streams (to free up FILE*'s)
 
 	StreamErrorSignal       <Signal> parent of all stream errors (see Stream class)
-	ReadErrorSignal         <Signal> raised on read errors
-	WriteErrorSignal        <Signal> raised on write errors
 	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
@@ -184,14 +182,6 @@
 	OpenErrorSignal nameClass:self message:#openErrorSignal.
 	OpenErrorSignal notifierString:'open error'.
 
-	ReadErrorSignal := StreamErrorSignal newSignalMayProceed:false.
-	ReadErrorSignal nameClass:self message:#readErrorSignal.
-	ReadErrorSignal notifierString:'read error'.
-
-	WriteErrorSignal := StreamErrorSignal newSignalMayProceed:false.
-	WriteErrorSignal nameClass:self message:#writeErrorSignal.
-	WriteErrorSignal notifierString:'write error'.
-
 	InvalidReadSignal := ReadErrorSignal newSignalMayProceed:false.
 	InvalidReadSignal nameClass:self message:#invalidReadSignal.
 	InvalidReadSignal notifierString:'read error'.
@@ -270,22 +260,10 @@
     ^ OpenErrorSignal
 !
 
-readErrorSignal
-    "return the signal raised on read errors"
-
-    ^ ReadErrorSignal
-!
-
 streamNotOpenSignal
     "return the signal raised on I/O with closed streams"
 
     ^ StreamNotOpenSignal
-!
-
-writeErrorSignal
-    "return the signal raised on write errors"
-
-    ^ WriteErrorSignal
 ! !
 
 !ExternalStream class methodsFor:'error handling'!
@@ -3453,6 +3431,6 @@
 !ExternalStream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Attic/ExtStream.st,v 1.80 1995-12-19 19:15:16 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Attic/ExtStream.st,v 1.81 1995-12-23 19:05:00 cg Exp $'
 ! !
 ExternalStream initialize!