NonPositionableExternalStream.st
changeset 22702 d347a51bef9c
parent 22541 b8acf94e540b
child 22777 8edae1451af4
--- a/NonPositionableExternalStream.st	Tue Apr 24 10:00:07 2018 +0200
+++ b/NonPositionableExternalStream.st	Tue Apr 24 10:29:43 2018 +0200
@@ -586,9 +586,9 @@
 !
 
 initializeForStderr
-    "{ Pragma: +optSpace }"
+    "setup for writing to stderr"
 
-    "setup for writing to stderr"
+    "{ Pragma: +optSpace }"
 
     mode := #writeonly. "since stderr may be redirected to a pipe, reading is forbidden"
     binary := false.
@@ -600,9 +600,15 @@
     self initializeEOLMode.
     OperatingSystem isMSWINDOWSlike ifTrue:[
         eolMode := #crlf
-    ]
+    ].
+    "This will possibly never be finalized, but keep in in Lobby
+     to make #openStreams work"
+    self registerForFinalization.
+    "#registerForFinalization sets #preventTenueOf:, but I live forever..."
+    ObjectMemory allowTenureOf:self.
 
     "Modified: / 25-04-2017 / 02:13:56 / cg"
+    "Modified (comment): / 24-04-2018 / 10:28:50 / stefan"
 !
 
 initializeForStdin
@@ -619,8 +625,14 @@
     handle := self handleForStdin.
     hitEOF := false.
     self initializeEOLMode.
+    "This will possibly never be finalized, but keep in in Lobby
+     to make #openStreams work"
+    self registerForFinalization.
+    "#registerForFinalization sets #preventTenueOf:, but I live forever..."
+    ObjectMemory allowTenureOf:self.
 
     "Modified: / 25-04-2017 / 02:14:22 / cg"
+    "Modified (comment): / 24-04-2018 / 10:28:43 / stefan"
 !
 
 initializeForStdout
@@ -638,9 +650,16 @@
     hitEOF := false.
     OperatingSystem isMSWINDOWSlike ifTrue:[
         eolMode := #crlf
-    ]
+    ].
+
+    "This will possibly never be finalized, but keep in in Lobby
+     to make #openStreams work"
+    self registerForFinalization.
+    "#registerForFinalization sets #preventTenueOf:, but I live forever..."
+    ObjectMemory allowTenureOf:self.
 
     "Modified: / 25-04-2017 / 02:14:27 / cg"
+    "Modified (comment): / 24-04-2018 / 10:28:38 / stefan"
 !
 
 reOpen