--- a/ExternalStream.st Fri Jan 31 02:04:30 2014 +0000
+++ b/ExternalStream.st Sun Feb 02 14:16:24 2014 +0000
@@ -1366,7 +1366,7 @@
} \
break; \
} \
- __offs += (ret); \
+ __offs += (ret); break; \
} \
} \
if (__offs > 0) \
@@ -1802,11 +1802,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 +2543,16 @@
self closeFile
! !
+!ExternalStream methodsFor:'initialization'!
+
+initialize
+ position := 0.
+ binary := false.
+ buffered := true.
+ eolMode := DefaultEOLMode.
+ hitEOF := false.
+! !
+
!ExternalStream methodsFor:'line reading/writing'!
nextLine
@@ -5824,11 +5832,11 @@
!ExternalStream class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/ExternalStream.st,v 1.374 2013-12-04 14:24:56 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/ExternalStream.st,v 1.378 2014-01-29 13:35:20 stefan Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic/ExternalStream.st,v 1.374 2013-12-04 14:24:56 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/ExternalStream.st,v 1.378 2014-01-29 13:35:20 stefan Exp $'
! !