#REFACTORING by cg
authorClaus Gittinger <cg@exept.de>
Thu, 30 Jun 2016 18:02:22 +0200
changeset 20065 d029c0ee981f
parent 20064 a487b5236ea1
child 20066 67c2e813b4e5
child 20080 093324d7a47c
#REFACTORING by cg class: Stream moved: #errorNotOpen
Stream.st
--- a/Stream.st	Thu Jun 30 18:02:07 2016 +0200
+++ b/Stream.st	Thu Jun 30 18:02:22 2016 +0200
@@ -533,6 +533,16 @@
     ^ self
 !
 
+errorNotOpen
+    "{ Pragma: +optSpace }"
+
+    "report an error, that the stream has not been opened"
+
+    ^ StreamNotOpenError raiseRequestWith:self  "/ in:thisContext sender
+
+    "Modified: / 8.5.1999 / 20:12:33 / cg"
+!
+
 pastEnd
     "someone tried to read after the end of the stream.
      If signalAtEnd == true, raise a signal. If it's false, return nil.