JavaConstantPool.st
author cg
Fri, 28 Jun 1996 21:39:41 +0000
changeset 89 3f6da952c7c6
child 135 098936234135
permissions -rw-r--r--
intitial checkin
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
89
3f6da952c7c6 intitial checkin
cg
parents:
diff changeset
     1
Array subclass:#JavaConstantPool
3f6da952c7c6 intitial checkin
cg
parents:
diff changeset
     2
	instanceVariableNames:'owner'
3f6da952c7c6 intitial checkin
cg
parents:
diff changeset
     3
	classVariableNames:''
3f6da952c7c6 intitial checkin
cg
parents:
diff changeset
     4
	poolDictionaries:''
3f6da952c7c6 intitial checkin
cg
parents:
diff changeset
     5
	category:'Java-Reader-Support'
3f6da952c7c6 intitial checkin
cg
parents:
diff changeset
     6
!
3f6da952c7c6 intitial checkin
cg
parents:
diff changeset
     7
3f6da952c7c6 intitial checkin
cg
parents:
diff changeset
     8
3f6da952c7c6 intitial checkin
cg
parents:
diff changeset
     9
!JavaConstantPool methodsFor:'accessing'!
3f6da952c7c6 intitial checkin
cg
parents:
diff changeset
    10
3f6da952c7c6 intitial checkin
cg
parents:
diff changeset
    11
owner
3f6da952c7c6 intitial checkin
cg
parents:
diff changeset
    12
    "return owner"
3f6da952c7c6 intitial checkin
cg
parents:
diff changeset
    13
3f6da952c7c6 intitial checkin
cg
parents:
diff changeset
    14
    ^ owner
3f6da952c7c6 intitial checkin
cg
parents:
diff changeset
    15
3f6da952c7c6 intitial checkin
cg
parents:
diff changeset
    16
    "Created: 28.6.1996 / 21:12:22 / cg"
3f6da952c7c6 intitial checkin
cg
parents:
diff changeset
    17
!
3f6da952c7c6 intitial checkin
cg
parents:
diff changeset
    18
3f6da952c7c6 intitial checkin
cg
parents:
diff changeset
    19
owner:something
3f6da952c7c6 intitial checkin
cg
parents:
diff changeset
    20
    "set owner"
3f6da952c7c6 intitial checkin
cg
parents:
diff changeset
    21
3f6da952c7c6 intitial checkin
cg
parents:
diff changeset
    22
    owner := something.
3f6da952c7c6 intitial checkin
cg
parents:
diff changeset
    23
3f6da952c7c6 intitial checkin
cg
parents:
diff changeset
    24
    "Created: 28.6.1996 / 21:12:22 / cg"
3f6da952c7c6 intitial checkin
cg
parents:
diff changeset
    25
! !
3f6da952c7c6 intitial checkin
cg
parents:
diff changeset
    26
3f6da952c7c6 intitial checkin
cg
parents:
diff changeset
    27
!JavaConstantPool methodsFor:'printing & storing'!
3f6da952c7c6 intitial checkin
cg
parents:
diff changeset
    28
3f6da952c7c6 intitial checkin
cg
parents:
diff changeset
    29
displayString
3f6da952c7c6 intitial checkin
cg
parents:
diff changeset
    30
    owner isNil ifTrue:[
3f6da952c7c6 intitial checkin
cg
parents:
diff changeset
    31
        ^ '*** unowned ConstantPool'
3f6da952c7c6 intitial checkin
cg
parents:
diff changeset
    32
    ].
3f6da952c7c6 intitial checkin
cg
parents:
diff changeset
    33
    ^ 'ConstantPool of ' , owner fullName
3f6da952c7c6 intitial checkin
cg
parents:
diff changeset
    34
3f6da952c7c6 intitial checkin
cg
parents:
diff changeset
    35
    "Created: 28.6.1996 / 21:13:41 / cg"
3f6da952c7c6 intitial checkin
cg
parents:
diff changeset
    36
    "Modified: 28.6.1996 / 21:20:26 / cg"
3f6da952c7c6 intitial checkin
cg
parents:
diff changeset
    37
! !
3f6da952c7c6 intitial checkin
cg
parents:
diff changeset
    38
3f6da952c7c6 intitial checkin
cg
parents:
diff changeset
    39
!JavaConstantPool  class methodsFor:'documentation'!
3f6da952c7c6 intitial checkin
cg
parents:
diff changeset
    40
3f6da952c7c6 intitial checkin
cg
parents:
diff changeset
    41
version
3f6da952c7c6 intitial checkin
cg
parents:
diff changeset
    42
    ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaConstantPool.st,v 1.1 1996/06/28 21:39:06 cg Exp $'
3f6da952c7c6 intitial checkin
cg
parents:
diff changeset
    43
! !