WeakDependencyDictionary.st
author Jan Vrany <jan.vrany@fit.cvut.cz>
Thu, 29 Sep 2011 16:44:37 +0100
branchjv
changeset 17869 9610c6c94e71
parent 17865 598963c6ff8e
child 17892 d86c8bd5ece3
permissions -rw-r--r--
(none)
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
2093
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     1
"
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     2
 COPYRIGHT (c) 1997 by Claus Gittinger
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     3
              All Rights Reserved
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     4
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     5
 This software is furnished under a license and may be used
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     6
 only in accordance with the terms of that license and with the
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     7
 inclusion of the above copyright notice.   This software may not
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     8
 be provided or otherwise made available to, or used by, any
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     9
 other person.  No title to or ownership of the software is
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    10
 hereby transferred.
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    11
"
8031
38f7b57a3f77 print removed
Claus Gittinger <cg@exept.de>
parents: 4350
diff changeset
    12
"{ Package: 'stx:libbasic' }"
38f7b57a3f77 print removed
Claus Gittinger <cg@exept.de>
parents: 4350
diff changeset
    13
2093
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    14
WeakIdentityDictionary subclass:#WeakDependencyDictionary
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    15
	instanceVariableNames:''
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    16
	classVariableNames:''
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    17
	poolDictionaries:''
4350
5aa2a3b9fd5b category change
Claus Gittinger <cg@exept.de>
parents: 2512
diff changeset
    18
	category:'Collections-Weak'
2093
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    19
!
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    20
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    21
!WeakDependencyDictionary class methodsFor:'documentation'!
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    22
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    23
copyright
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    24
"
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    25
 COPYRIGHT (c) 1997 by Claus Gittinger
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    26
              All Rights Reserved
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    27
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    28
 This software is furnished under a license and may be used
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    29
 only in accordance with the terms of that license and with the
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    30
 inclusion of the above copyright notice.   This software may not
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    31
 be provided or otherwise made available to, or used by, any
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    32
 other person.  No title to or ownership of the software is
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    33
 hereby transferred.
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    34
"
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    35
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    36
!
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    37
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    38
documentation
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    39
"
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    40
    A specialized WeakIdentityDictionary, which 'knowns' how
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    41
    to get rid of obsolete entries. This is only used with the
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    42
    dependency mechanism.
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    43
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    44
    [author:]
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    45
        Claus Gittinger
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    46
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    47
    [See also:]
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    48
        WeakArray WeakIdentityDictionary WeakValueDictionary WeakIdentitySet
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    49
"
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    50
! !
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    51
2297
118f794c4e42 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
    52
!WeakDependencyDictionary methodsFor:'private'!
118f794c4e42 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
    53
118f794c4e42 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
    54
keyContainerOfSize:n
118f794c4e42 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
    55
    "return a container for keys of size n.
118f794c4e42 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
    56
     use WeakArrays here."
118f794c4e42 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
    57
118f794c4e42 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
    58
    |w|
118f794c4e42 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
    59
118f794c4e42 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
    60
    w := WeakArray new:n.
118f794c4e42 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
    61
    ^ w
118f794c4e42 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
    62
118f794c4e42 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
    63
    "Modified: 7.1.1997 / 17:01:15 / stefan"
118f794c4e42 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
    64
! !
118f794c4e42 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
    65
2093
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    66
!WeakDependencyDictionary methodsFor:'special dependency support'!
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    67
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    68
removeEmptyDependencyValues
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    69
    "special entry for dependency management:
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    70
     remove any empty (due to finalization) value WeakArray elements."
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    71
2512
a57c66f472b3 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 2508
diff changeset
    72
    |index t wasBlocked deps o key originalKeyArray|
2093
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    73
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    74
    "/ careful: this is sent by the finalizer at low prio.
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    75
    "/ be prepared for the receiver to change while we walk over
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    76
    "/ the value array here ...
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    77
2297
118f794c4e42 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
    78
"/ 'removeEmptyDependencyValues ...' printCR.
118f794c4e42 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
    79
2316
6b24c092456a mhmh - be very careful when removing empty slots.
Claus Gittinger <cg@exept.de>
parents: 2300
diff changeset
    80
    originalKeyArray := keyArray.
6b24c092456a mhmh - be very careful when removing empty slots.
Claus Gittinger <cg@exept.de>
parents: 2300
diff changeset
    81
2093
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    82
    index := 1.
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    83
    [index <= keyArray size] whileTrue:[
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    84
        "/ get the size again - it could have changed
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    85
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    86
        wasBlocked := OperatingSystem blockInterrupts.
2297
118f794c4e42 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
    87
2316
6b24c092456a mhmh - be very careful when removing empty slots.
Claus Gittinger <cg@exept.de>
parents: 2300
diff changeset
    88
        keyArray ~~ originalKeyArray ifTrue:[
6b24c092456a mhmh - be very careful when removing empty slots.
Claus Gittinger <cg@exept.de>
parents: 2300
diff changeset
    89
            index := 1. "/ start over
8031
38f7b57a3f77 print removed
Claus Gittinger <cg@exept.de>
parents: 4350
diff changeset
    90
            "/ 'restart removeEmpty' infoPrintCR.
2316
6b24c092456a mhmh - be very careful when removing empty slots.
Claus Gittinger <cg@exept.de>
parents: 2300
diff changeset
    91
            originalKeyArray := keyArray.
6b24c092456a mhmh - be very careful when removing empty slots.
Claus Gittinger <cg@exept.de>
parents: 2300
diff changeset
    92
        ].
6b24c092456a mhmh - be very careful when removing empty slots.
Claus Gittinger <cg@exept.de>
parents: 2300
diff changeset
    93
2093
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    94
        index <= keyArray size ifTrue:[
2297
118f794c4e42 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
    95
            key := keyArray basicAt:index.
118f794c4e42 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
    96
            key == 0 ifTrue:[
2316
6b24c092456a mhmh - be very careful when removing empty slots.
Claus Gittinger <cg@exept.de>
parents: 2300
diff changeset
    97
                "/ that one is gone
2512
a57c66f472b3 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 2508
diff changeset
    98
                key := DeletedEntry.
2316
6b24c092456a mhmh - be very careful when removing empty slots.
Claus Gittinger <cg@exept.de>
parents: 2300
diff changeset
    99
                keyArray basicAt:index put:key.
6b24c092456a mhmh - be very careful when removing empty slots.
Claus Gittinger <cg@exept.de>
parents: 2300
diff changeset
   100
                valueArray basicAt:index put:nil.
6b24c092456a mhmh - be very careful when removing empty slots.
Claus Gittinger <cg@exept.de>
parents: 2300
diff changeset
   101
                tally := tally - 1.
2297
118f794c4e42 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
   102
            ].
118f794c4e42 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
   103
2512
a57c66f472b3 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 2508
diff changeset
   104
            (key notNil and:[key ~~ DeletedEntry]) ifTrue:[
2316
6b24c092456a mhmh - be very careful when removing empty slots.
Claus Gittinger <cg@exept.de>
parents: 2300
diff changeset
   105
                deps := valueArray basicAt:index.
6b24c092456a mhmh - be very careful when removing empty slots.
Claus Gittinger <cg@exept.de>
parents: 2300
diff changeset
   106
                deps notNil ifTrue:[
6b24c092456a mhmh - be very careful when removing empty slots.
Claus Gittinger <cg@exept.de>
parents: 2300
diff changeset
   107
                    "/ is it an empty WeakArray ?
2093
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   108
2316
6b24c092456a mhmh - be very careful when removing empty slots.
Claus Gittinger <cg@exept.de>
parents: 2300
diff changeset
   109
                    (deps isMemberOf:WeakArray) ifTrue:[
2508
32924c15a4cd *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 2316
diff changeset
   110
                        t := deps findFirst:[:el | el notNil and:[el ~~ 0]].
2316
6b24c092456a mhmh - be very careful when removing empty slots.
Claus Gittinger <cg@exept.de>
parents: 2300
diff changeset
   111
                        t == 0 ifTrue:[
6b24c092456a mhmh - be very careful when removing empty slots.
Claus Gittinger <cg@exept.de>
parents: 2300
diff changeset
   112
                            "/ yes - nil it
6b24c092456a mhmh - be very careful when removing empty slots.
Claus Gittinger <cg@exept.de>
parents: 2300
diff changeset
   113
                            valueArray basicAt:index put:nil.
2512
a57c66f472b3 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 2508
diff changeset
   114
                            keyArray basicAt:index put:DeletedEntry.
2093
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   115
                            tally := tally - 1.
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   116
                        ]
2316
6b24c092456a mhmh - be very careful when removing empty slots.
Claus Gittinger <cg@exept.de>
parents: 2300
diff changeset
   117
                    ] ifFalse:[
6b24c092456a mhmh - be very careful when removing empty slots.
Claus Gittinger <cg@exept.de>
parents: 2300
diff changeset
   118
                       "/ is it an empty WeakIdSet ?
6b24c092456a mhmh - be very careful when removing empty slots.
Claus Gittinger <cg@exept.de>
parents: 2300
diff changeset
   119
6b24c092456a mhmh - be very careful when removing empty slots.
Claus Gittinger <cg@exept.de>
parents: 2300
diff changeset
   120
                       (deps isMemberOf:WeakIdentitySet) ifTrue:[
6b24c092456a mhmh - be very careful when removing empty slots.
Claus Gittinger <cg@exept.de>
parents: 2300
diff changeset
   121
                            (t := deps size) == 0 ifTrue:[
6b24c092456a mhmh - be very careful when removing empty slots.
Claus Gittinger <cg@exept.de>
parents: 2300
diff changeset
   122
                                "/ yes - nil it
6b24c092456a mhmh - be very careful when removing empty slots.
Claus Gittinger <cg@exept.de>
parents: 2300
diff changeset
   123
                                valueArray basicAt:index put:nil.
2512
a57c66f472b3 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 2508
diff changeset
   124
                                keyArray basicAt:index put:DeletedEntry.
2316
6b24c092456a mhmh - be very careful when removing empty slots.
Claus Gittinger <cg@exept.de>
parents: 2300
diff changeset
   125
                                tally := tally - 1.
6b24c092456a mhmh - be very careful when removing empty slots.
Claus Gittinger <cg@exept.de>
parents: 2300
diff changeset
   126
"/                            ] ifFalse:[
6b24c092456a mhmh - be very careful when removing empty slots.
Claus Gittinger <cg@exept.de>
parents: 2300
diff changeset
   127
"/                                t == 1 ifTrue:[
6b24c092456a mhmh - be very careful when removing empty slots.
Claus Gittinger <cg@exept.de>
parents: 2300
diff changeset
   128
"/                                    "/ careful - it could actually be empty
6b24c092456a mhmh - be very careful when removing empty slots.
Claus Gittinger <cg@exept.de>
parents: 2300
diff changeset
   129
"/                                    o := deps firstIfEmpty:nil.
6b24c092456a mhmh - be very careful when removing empty slots.
Claus Gittinger <cg@exept.de>
parents: 2300
diff changeset
   130
"/                                    o notNil ifTrue:[
6b24c092456a mhmh - be very careful when removing empty slots.
Claus Gittinger <cg@exept.de>
parents: 2300
diff changeset
   131
"/                                        "/ the set lost an object, and shrunk to size 1
6b24c092456a mhmh - be very careful when removing empty slots.
Claus Gittinger <cg@exept.de>
parents: 2300
diff changeset
   132
"/                                        "/ can now use a WeakArray
6b24c092456a mhmh - be very careful when removing empty slots.
Claus Gittinger <cg@exept.de>
parents: 2300
diff changeset
   133
"/                                        valueArray basicAt:index put:(WeakArray with:o)
6b24c092456a mhmh - be very careful when removing empty slots.
Claus Gittinger <cg@exept.de>
parents: 2300
diff changeset
   134
"/                                    ] ifFalse:[
6b24c092456a mhmh - be very careful when removing empty slots.
Claus Gittinger <cg@exept.de>
parents: 2300
diff changeset
   135
"/                                        key notNil ifTrue:[
2512
a57c66f472b3 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 2508
diff changeset
   136
"/                                            keyArray basicAt:index put:DeletedEntry.
2316
6b24c092456a mhmh - be very careful when removing empty slots.
Claus Gittinger <cg@exept.de>
parents: 2300
diff changeset
   137
"/                                            tally := tally - 1.
6b24c092456a mhmh - be very careful when removing empty slots.
Claus Gittinger <cg@exept.de>
parents: 2300
diff changeset
   138
"/                                        ]
6b24c092456a mhmh - be very careful when removing empty slots.
Claus Gittinger <cg@exept.de>
parents: 2300
diff changeset
   139
"/                                    ]
6b24c092456a mhmh - be very careful when removing empty slots.
Claus Gittinger <cg@exept.de>
parents: 2300
diff changeset
   140
"/                                ]
6b24c092456a mhmh - be very careful when removing empty slots.
Claus Gittinger <cg@exept.de>
parents: 2300
diff changeset
   141
                            ]
6b24c092456a mhmh - be very careful when removing empty slots.
Claus Gittinger <cg@exept.de>
parents: 2300
diff changeset
   142
                        ]
2093
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   143
                    ]
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   144
                ] ifFalse:[
8031
38f7b57a3f77 print removed
Claus Gittinger <cg@exept.de>
parents: 4350
diff changeset
   145
                    "/ 'oops: nil value for key' infoPrint. key infoPrintCR.
2512
a57c66f472b3 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 2508
diff changeset
   146
                    keyArray basicAt:index put:DeletedEntry.
2297
118f794c4e42 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
   147
                    tally := tally - 1.
118f794c4e42 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
   148
                ]
2093
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   149
            ]
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   150
        ].
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   151
2279
ef0f7f5216c4 oops - irqBlockingstate was corrupted
Claus Gittinger <cg@exept.de>
parents: 2261
diff changeset
   152
        wasBlocked ifFalse:[OperatingSystem unblockInterrupts].
2093
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   153
        index := index + 1.
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   154
    ].
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   155
2297
118f794c4e42 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 2279
diff changeset
   156
"/ 'done' printCR.
2093
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   157
    "
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   158
     Dependencies removeEmptyDependencyValues
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   159
    "
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   160
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   161
    "Created: 9.1.1997 / 00:00:28 / cg"
2512
a57c66f472b3 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 2508
diff changeset
   162
    "Modified: 27.3.1997 / 15:55:12 / cg"
2299
fc326c7457b4 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 2297
diff changeset
   163
! !
fc326c7457b4 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 2297
diff changeset
   164
2093
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   165
!WeakDependencyDictionary class methodsFor:'documentation'!
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   166
3a849047dc90 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   167
version
17869
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 17865
diff changeset
   168
    ^ '$Id: WeakDependencyDictionary.st 10700 2011-09-29 15:44:37Z vranyj1 $'
17865
598963c6ff8e Recommited from itself
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 17846
diff changeset
   169
!
598963c6ff8e Recommited from itself
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 17846
diff changeset
   170
598963c6ff8e Recommited from itself
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 17846
diff changeset
   171
version_SVN
17869
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 17865
diff changeset
   172
    ^ '$Id: WeakDependencyDictionary.st 10700 2011-09-29 15:44:37Z vranyj1 $'
17846
24edc476ac18 Merged with /trunk
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 17845
diff changeset
   173
! !