--- a/Queue.st	Thu May 30 11:41:06 2019 +0200
+++ b/Queue.st	Tue Jun 04 12:37:50 2019 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1993 by Claus Gittinger
 	      All Rights Reserved
@@ -629,7 +631,9 @@
 
 capacity:newSize
     "change the capacity of the queue. 
-     That is the number of slots it can hold."
+     That is the number of slots it can hold 
+     before the writer gets an exception (here)
+     or is suspended (in SharedQueue)."
 
     |newContentsArray n1 n2|
     
@@ -668,6 +672,8 @@
         ].    
      ].    
     "
+
+    "Modified (comment): / 04-06-2019 / 12:37:16 / Claus Gittinger"
 !
 
 init:size