--- a/ExternalStream.st Tue Jan 28 21:45:42 2014 +0100
+++ b/ExternalStream.st Tue Jan 28 23:21:02 2014 +0100
@@ -1322,6 +1322,7 @@
} \
}
# else /* use STDIO */
+#error XXXX
# define __WRITEBYTES_OBJ__(ret, f, obj, obj_offs, cnt, isBuffered, handleType) \
{ \
int __ooffs = obj_offs; \
@@ -1802,11 +1803,9 @@
!
new
- |newStream|
-
- newStream := self basicNew.
- newStream text; buffered:true; eolMode:DefaultEOLMode; clearEOF.
- ^ newStream
+ "re-enable new - disabled in Stream superclass"
+
+ ^ self basicNew initialize.
! !
!ExternalStream class methodsFor:'Signal constants'!
@@ -2545,6 +2544,12 @@
self closeFile
! !
+!ExternalStream methodsFor:'initialization'!
+
+initialize
+ self text; buffered:true; eolMode:DefaultEOLMode; clearEOF.
+! !
+
!ExternalStream methodsFor:'line reading/writing'!
nextLine
@@ -5824,11 +5829,11 @@
!ExternalStream class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/ExternalStream.st,v 1.375 2014-01-15 10:39:54 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/ExternalStream.st,v 1.376 2014-01-28 22:21:02 stefan Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic/ExternalStream.st,v 1.375 2014-01-15 10:39:54 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/ExternalStream.st,v 1.376 2014-01-28 22:21:02 stefan Exp $'
! !