#BUGFIX by stefan
authorStefan Vogel <sv@exept.de>
Mon, 15 Apr 2019 19:11:24 +0200
changeset 24080 0cc60a09f225
parent 24079 8e09e33e97b8
child 24081 916a16fd5889
#BUGFIX by stefan class: OrderedSet added: #isOrdered
OrderedSet.st
--- a/OrderedSet.st	Mon Apr 15 12:14:41 2019 +0200
+++ b/OrderedSet.st	Mon Apr 15 19:11:24 2019 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 2001 by eXept Software AG
               All Rights Reserved
@@ -521,6 +519,14 @@
     ^ order indexOf:anObject.
 ! !
 
+!OrderedSet methodsFor:'testing'!
+
+isOrdered
+    ^ true
+
+    "Created: / 15-04-2019 / 19:05:23 / Stefan Vogel"
+! !
+
 !OrderedSet class methodsFor:'documentation'!
 
 version