1 "

     2  COPYRIGHT (c) 2018 by Claus Gittinger

     3               All Rights Reserved

     4 

     5  This software is furnished under a license and may be used

     6  only in accordance with the terms of that license and with the

     7  inclusion of the above copyright notice.   This software may not

     8  be provided or otherwise made available to, or used by, any

     9  other person.  No title to or ownership of the software is

    10  hereby transferred.

    11 "

    12 "{ Package: 'stx:libbasic2' }"

    13 

    14 "{ NameSpace: Smalltalk }"

    15 

    16 OrderedCollection subclass:#WeakOrderedCollection

    17 	instanceVariableNames:''

    18 	classVariableNames:''

    19 	poolDictionaries:''

    20 	category:'Collections-Sequenceable'

    21 !

    22 

    23 !WeakOrderedCollection class methodsFor:'documentation'!

    24 

    25 copyright

    26 "

    27  COPYRIGHT (c) 2018 by Claus Gittinger

    28               All Rights Reserved

    29 

    30  This software is furnished under a license and may be used

    31  only in accordance with the terms of that license and with the

    32  inclusion of the above copyright notice.   This software may not

    33  be provided or otherwise made available to, or used by, any

    34  other person.  No title to or ownership of the software is

    35  hereby transferred.

    36 "

    37 !

    38 

    39 documentation

    40 "

    41     This is an OrderedCollection with weak references to its element.

    42     Elements may vanish and are silently replaced by nil, if the

    43     referred to element looses its last non-weak reference.

    44     The logical size of the instance or the element slots are not

    45     affected - thus, when an element is lost.

    46     So be prepared to get nil when accessing/enumerating.

    47 "

    48 ! !

    49 

    50 !WeakOrderedCollection methodsFor:'private'!

    51 

    52 containerClass

    53     ^ WeakArray

    54 

    55     "Created: / 30-07-2018 / 12:09:31 / Claus Gittinger"

    56 ! !

    57 

    58 !WeakOrderedCollection class methodsFor:'documentation'!

    59 

    60 version

    61     ^ '$Header$'

    62 !

    63 

    64 version_CVS

    65     ^ '$Header$'

    66 ! !

    67