SortedSet.st
changeset 4799 bf18e2754b1e
parent 4248 998a831e6c9d
equal deleted inserted replaced
4798:4d94e6a27e21 4799:bf18e2754b1e
       
     1 "{ Encoding: utf8 }"
       
     2 
     1 "
     3 "
     2  COPYRIGHT (c) 2012 by eXept Software AG
     4  COPYRIGHT (c) 2012 by eXept Software AG
     3               All Rights Reserved
     5               All Rights Reserved
     4 
     6 
     5  This software is furnished under a license and may be used
     7  This software is furnished under a license and may be used
    72         s := SortedSet new.
    74         s := SortedSet new.
    73         s add:'one'.
    75         s add:'one'.
    74         s add:'two'.
    76         s add:'two'.
    75         s add:'one'.
    77         s add:'one'.
    76         s add:'two'.
    78         s add:'two'.
       
    79         s add:'four'.
    77         s add:'three'.
    80         s add:'three'.
    78         s size.         
    81         s size.         
    79         s do:[:each | Transcript showCR:each].         
    82         s do:[:each | Transcript showCR:each].         
    80                                                                     [exEnd]
    83                                                                     [exEnd]
    81 
    84