Cherry-picked OrderedCollection.st from 0b286fd51da7: * d4c86d7c0bfc: #TUNING by stefan, Stefan Vogel <sv@exept.de> * 692b6497a669: #DOCUMENTATION by stefan, Stefan Vogel <sv@exept.de> * d47bb2912953: #DOCUMENTATION by stefan, Stefan Vogel <sv@exept.de> * abb4316c6bff: #FEATURE by cg, Claus Gittinger <cg@exept.de> * 3a8fce0e8d11: #TUNING by stefan, Stefan Vogel <sv@exept.de> * 03d29bf8c5bb: #REFACTORING by stefan, Stefan Vogel <sv@exept.de> * cccc6c4abcfc: #REFACTORING by stefan, Stefan Vogel <sv@exept.de> * 35d957c7a840: #FEATURE by cg, Claus Gittinger <cg@exept.de> * 6b11890f5f2c: #OTHER by cg, Claus Gittinger <cg@exept.de> * abb6108fb06b: #FEATURE by cg, Claus Gittinger <cg@exept.de> * 2c4768bb2e89: #FEATURE by cg, Claus Gittinger <cg@exept.de> * 4029e964d0f1: #FEATURE by cg, Claus Gittinger <cg@exept.de> * ddcab3a9c2df: #OTHER by cg, Claus Gittinger <cg@exept.de> * 2213eb56e0c7: #REFACTORING by exept, Claus Gittinger <cg@exept.de> * 09ca874a6160: #REFACTORING by exept, Claus Gittinger <cg@exept.de> * 30b332af1f33: #BUGFIX by stefan, Stefan Vogel <sv@exept.de> * 779764ba117b: #REFACTORING by cg, Claus Gittinger <cg@exept.de> * b3d232a613c9: #BUGFIX by stefan, Stefan Vogel <sv@exept.de> * c417f7edaec1: #BUGFIX by stefan, Stefan Vogel <sv@exept.de> * 904b6538f379: #FEATURE by exept, Claus Gittinger <cg@exept.de> * c5887f03e01f: #REFACTORING by stefan, Stefan Vogel <sv@exept.de> * 8912d03aff48: #BUGFIX by exept, Claus Gittinger <cg@exept.de> * de5cd1dab4c3: #DOCUMENTATION by exept, Claus Gittinger <cg@exept.de> * 9bbd26603378: #OTHER by exept, Claus Gittinger <cg@exept.de> * c2c9dc110f42: #FEATURE by stefan, Stefan Vogel <sv@exept.de> * 81d123c6703d: #DOCUMENTATION by stefan, Stefan Vogel <sv@exept.de> * 8aadbb21458a: #BUGFIX by stefan, Stefan Vogel <sv@exept.de> * f210dbb8b2f6: #TUNING by stefan, Stefan Vogel <sv@exept.de> * c2c774fc53c0: #FEATURE by exept, Claus Gittinger <cg@exept.de> * b6f462670875: #DOCUMENTATION by exept, Claus Gittinger <cg@exept.de> * 27ae4021d5d6: #FEATURE by stefan, Stefan Vogel <sv@exept.de> * 10d9e9d85594: #TUNING by exept, Claus Gittinger <cg@exept.de> * 2653d855dcc7: #DOCUMENTATION by exept, Claus Gittinger <cg@exept.de> * 6ea1698a1a34: #FEATURE by stefan, Stefan Vogel <sv@exept.de> * 28762315e664: #OTHER by exept, Claus Gittinger <cg@exept.de> * 7142ea786f3e: #TUNING by stefan, Stefan Vogel <sv@exept.de> * 7875acb42b53: #BUGFIX by stefan, Stefan Vogel <sv@exept.de> * 163a0eebc97e: #BUGFIX by Maren, matilk

     1

"

     2

 COPYRIGHT (c) 1995 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:libbasic' }"

    13

    14

"{ NameSpace: Smalltalk }"

    15

    16

Registry subclass:#HandleRegistry

    17

	instanceVariableNames:''

    18

	classVariableNames:''

    19

	poolDictionaries:''

    20

	category:'System-Support'

    21

!

    22

    23

!HandleRegistry class methodsFor:'documentation'!

    24

    25

copyright

    26

"

    27

 COPYRIGHT (c) 1995 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

    HandleRegistries are like Registries, in that they watch for the death of

    42

    a registered object. However, they send a self-change notification, passing the registered

    43

    handle as argument, instead of creating a shallow copy and letting it do the finalization.

    44

    Use Registry for objects which know themself how to clean up;

    45

    use HandleRegistry, if someone else does the cleanup.

    46

    47

    [author:]

    48

        Claus Gittinger

    49

"

    50

! !

    51

    52

!HandleRegistry methodsFor:'dispose handling'!

    53

    54

informDispose:someHandle

    55

    "an element was disposed; let my dependents know about this"

    56

    57

    self changed:#finalize with:someHandle

    58

! !

    59

    60

!HandleRegistry methodsFor:'redefined to block'!

    61

    62

register:anObject

    63

    "not useful for HandleRegistry - use #register:as:"

    64

    65

    self shouldNotImplement

    66

!

    67

    68

registerChange:anObject

    69

    "not useful for HandleRegistry"

    70

    71

    self shouldNotImplement

    72

! !

    73

    74

!HandleRegistry class methodsFor:'documentation'!

    75

    76

version

    77

    ^ '$Header$'

    78

!

    79

    80

version_SVN

    81

    ^ '$Id: HandleRegistry.st 10761 2012-01-19 11:46:00Z vranyj1 $'

    82

! !

    83

    84

    85