--- a/ReadStream.st	Fri Jul 08 19:15:03 2005 +0200
+++ b/ReadStream.st	Fri Jul 08 19:17:22 2005 +0200
@@ -361,7 +361,7 @@
     int pos, limit, sz;
     REGISTER unsigned char *cp;
     REGISTER unsigned ch;
-    int val = 0;
+    INT val = 0;
     OBJ coll, p, l;
 
     coll = __INST(collection);
@@ -787,5 +787,5 @@
 !ReadStream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ReadStream.st,v 1.53 2005-07-08 17:15:02 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ReadStream.st,v 1.54 2005-07-08 17:17:22 cg Exp $'
 ! !