# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1486382111 -3600
# Node ID 6040a106c11f957c6898c33a8fb60fd2d03d84a2
# Parent  632fa483a30621e76499bae2062563a9ff65cb6f
#DOCUMENTATION by cg
class: Set
comment/format in: #clearContents

diff -r 632fa483a306 -r 6040a106c11f Set.st
--- a/Set.st	Mon Feb 06 09:55:42 2017 +0100
+++ b/Set.st	Mon Feb 06 12:55:11 2017 +0100
@@ -372,11 +372,15 @@
 !
 
 clearContents
-    "remove all elements from the receiver, but do not resize.
-     Returns the receiver."
+    "remove all elements from the receiver, but does not resize.
+     Returns the receiver.
+     Similar to removeAll, but might behave better, 
+     if the receiver is to be filled again afterwards."
 
     keyArray atAllPut:nil.
     tally := 0.
+
+    "Modified (comment): / 06-02-2017 / 12:55:05 / cg"
 !
 
 remove:oldObjectArg ifAbsent:exceptionBlock