#DOCUMENTATION by stefan
authorStefan Vogel <sv@exept.de>
Thu, 16 Mar 2017 16:50:03 +0100
changeset 21651 e55ca15b7c8d
parent 21650 61639cef6166
child 21652 927a47057848
#DOCUMENTATION by stefan class: OrderedSet comment/format in: #testAndAdd:
OrderedSet.st
--- a/OrderedSet.st	Thu Mar 16 16:49:46 2017 +0100
+++ b/OrderedSet.st	Thu Mar 16 16:50:03 2017 +0100
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 2001 by eXept Software AG
               All Rights Reserved
@@ -330,9 +328,10 @@
 !
 
 testAndAdd:anObject 
-    "add the argument, anObject to the receiver.
+    "Test, if the element is present in the receiver.
      Answer true, if the element did already exist in the collection,
      false otherwise.
+     If the element does not exist, add it to the collection.
      Also, remember in the order (i.e. add to the end)
      If anObject is already present in the set,
      the order will not be changed. (See also: #addLast:)"
@@ -344,6 +343,7 @@
     ^ false.
 
     "Modified: / 16-02-2017 / 13:45:50 / stefan"
+    "Modified (comment): / 16-03-2017 / 16:48:54 / stefan"
 ! !
 
 !OrderedSet methodsFor:'converting'!