--- a/FileStream.st Thu Mar 04 10:36:59 2004 +0100
+++ b/FileStream.st Thu Mar 04 12:42:14 2004 +0100
@@ -1194,7 +1194,7 @@
}
if (f != NULL) {
wasBlocked = __BLOCKINTERRUPTS();
- __INST(filePointer) = __MKOBJ((INT)f);
+ __INST(filePointer) = fp = __MKOBJ((INT)f); __STORE(self, fp);
}
__INST(position) = @global(PositionableStream:ZeroPosition);
}
@@ -1420,7 +1420,7 @@
!FileStream class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/FileStream.st,v 1.106 2004-03-02 16:28:24 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/FileStream.st,v 1.107 2004-03-04 11:42:14 ca Exp $'
! !
FileStream initialize!