--- a/SequenceableCollection.st	Fri Feb 17 14:19:18 1995 +0100
+++ b/SequenceableCollection.st	Fri Feb 17 17:57:21 1995 +0100
@@ -21,7 +21,7 @@
 COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
 
-$Header: /cvs/stx/stx/libbasic/SequenceableCollection.st,v 1.21 1995-02-17 13:04:25 claus Exp $
+$Header: /cvs/stx/stx/libbasic/SequenceableCollection.st,v 1.22 1995-02-17 16:57:21 claus Exp $
 '!
 
 !SequenceableCollection class methodsFor:'documentation'!
@@ -42,7 +42,7 @@
 
 version
 "
-$Header: /cvs/stx/stx/libbasic/SequenceableCollection.st,v 1.21 1995-02-17 13:04:25 claus Exp $
+$Header: /cvs/stx/stx/libbasic/SequenceableCollection.st,v 1.22 1995-02-17 16:57:21 claus Exp $
 "
 !
 
@@ -150,7 +150,7 @@
 
 asStringWithCRs
     "return a string generated by concatenating my elements 
-     (which must be strings) and embedding cr characters in between.
+     (which must be strings or nil) and embedding cr characters in between.
      Nil entries and empty strings are counted as empty lines."
 
     ^ self asStringWithCRsFrom:1 to:(self size)
@@ -158,7 +158,7 @@
 
 asStringWithCRsFrom:firstLine to:lastLine
     "return a string generated by concatenating some of my elements 
-     (which must be strings) and embedding cr characters in between.
+     (which must be strings or nil) and embedding cr characters in between.
      Nil entries and empty strings are counted as empty lines."
 
     ^ self asStringWithCRsFrom:firstLine to:lastLine compressTabs:false withCR:true
@@ -166,7 +166,7 @@
 
 asStringWithCRsFrom:firstLine to:lastLine compressTabs:compressTabs
     "return part of myself as a string with embedded cr's.
-     My elements must be strings.
+     My elements must be strings or nil.
      If the argument compressTabs is true, leading spaces are converted
      to tab-characters (8col tabs).
      Nil entries and empty strings are taken as empty lines."
@@ -174,9 +174,9 @@
     ^ self asStringWithCRsFrom:firstLine to:lastLine compressTabs:compressTabs withCR:true
 !
 
-asStringCRsfrom:firstLine to:lastLine compressTabs:compressTabs withCR:withCR
+asStringWithCRsfrom:firstLine to:lastLine compressTabs:compressTabs withCR:withCR
     "return part of myself as a string with embedded cr's.
-     My elements must be strings; nil entries and empty strings are
+     My elements must be strings or nil; nil entries and empty strings are
      taken as empty lines.
      If the argument compressTabs is true, leading spaces are converted
      to tab-characters (8col tabs). WithCR controls whether the last line
@@ -191,14 +191,15 @@
 
 asStringWith:sepCharacter from:firstLine to:lastLine compressTabs:compressTabs final:endCharacter
     "return part of myself as a string with embedded sepCharacters.
-     My elements must be strings; nil entries and empty strings are
+     My elements must be strings or nil; nil entries and empty strings are
      taken as empty lines.
      If the argument compressTabs is true, leading spaces are converted
      to tab-characters (8col tabs). The last line is followed by a final
      character (if non-nil).
 
      This method is tuned for big collections, in not creating many
-     intermediate strings (has linear runtime)."
+     intermediate strings (has linear runtime). For very small collections
+     and small strings, it may be faster to use the comma , operation."
 
     |totalLength "{ Class:SmallInteger }"
      pos         "{ Class:SmallInteger }"