--- a/ReadStream.st	Tue Oct 01 16:49:25 1996 +0200
+++ b/ReadStream.st	Wed Oct 02 13:35:15 1996 +0200
@@ -203,7 +203,7 @@
 
 	__INST(position) = __MKSMALLINT(pos);
 	buffer[len] = '\0';
-	RETURN ( (len != 0) ? __MKSTRING_L(buffer, len COMMA_CON) : nil );
+	RETURN ( (len != 0) ? __MKSTRING_L(buffer, len) : nil );
     }
 %}
 .
@@ -357,7 +357,7 @@
 
 	__INST(position) = __MKSMALLINT(pos);
 	buffer[len] = '\0';
-	RETURN ( (len != 0) ? __MKSTRING_L(buffer, len COMMA_CON) : nil );
+	RETURN ( (len != 0) ? __MKSTRING_L(buffer, len) : nil );
     }
 %}
 .
@@ -572,5 +572,5 @@
 !ReadStream  class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ReadStream.st,v 1.31 1996-09-13 16:49:38 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ReadStream.st,v 1.32 1996-10-02 11:33:45 cg Exp $'
 ! !