JavaFieldref.st
author cg
Tue, 30 Apr 1996 23:24:49 +0000
changeset 27 4560bb77bb36
parent 13 7075280c0cee
child 41 eb7974d88088
permissions -rw-r--r--
checkin from browser
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
1
083530508d9c intitial checkin
cg
parents:
diff changeset
     1
JavaRef subclass:#JavaFieldref
27
4560bb77bb36 checkin from browser
cg
parents: 13
diff changeset
     2
	instanceVariableNames:'offset'
1
083530508d9c intitial checkin
cg
parents:
diff changeset
     3
	classVariableNames:''
083530508d9c intitial checkin
cg
parents:
diff changeset
     4
	poolDictionaries:''
4
07264ed96b97 checkin from browser
cg
parents: 1
diff changeset
     5
	category:'Java-Reader-Support'
1
083530508d9c intitial checkin
cg
parents:
diff changeset
     6
!
083530508d9c intitial checkin
cg
parents:
diff changeset
     7
083530508d9c intitial checkin
cg
parents:
diff changeset
     8
27
4560bb77bb36 checkin from browser
cg
parents: 13
diff changeset
     9
!JavaFieldref methodsFor:'resolving'!
4560bb77bb36 checkin from browser
cg
parents: 13
diff changeset
    10
4560bb77bb36 checkin from browser
cg
parents: 13
diff changeset
    11
offset
4560bb77bb36 checkin from browser
cg
parents: 13
diff changeset
    12
    |nm sig mthd|
4560bb77bb36 checkin from browser
cg
parents: 13
diff changeset
    13
4560bb77bb36 checkin from browser
cg
parents: 13
diff changeset
    14
    offset notNil ifTrue:[^ offset].
4560bb77bb36 checkin from browser
cg
parents: 13
diff changeset
    15
4560bb77bb36 checkin from browser
cg
parents: 13
diff changeset
    16
    (class isMemberOf:JavaUnresolvedClassConstant) ifTrue:[
4560bb77bb36 checkin from browser
cg
parents: 13
diff changeset
    17
        class := class resolve
4560bb77bb36 checkin from browser
cg
parents: 13
diff changeset
    18
    ].
4560bb77bb36 checkin from browser
cg
parents: 13
diff changeset
    19
    (class isMemberOf:JavaUnresolvedClassConstant) ifTrue:[
4560bb77bb36 checkin from browser
cg
parents: 13
diff changeset
    20
        self halt.
4560bb77bb36 checkin from browser
cg
parents: 13
diff changeset
    21
    ].
4560bb77bb36 checkin from browser
cg
parents: 13
diff changeset
    22
4560bb77bb36 checkin from browser
cg
parents: 13
diff changeset
    23
    nm := nameandType name asSymbol.
4560bb77bb36 checkin from browser
cg
parents: 13
diff changeset
    24
    sig := nameandType signature.
4560bb77bb36 checkin from browser
cg
parents: 13
diff changeset
    25
4560bb77bb36 checkin from browser
cg
parents: 13
diff changeset
    26
    offset := class instVarOffsetOf:nm.
4560bb77bb36 checkin from browser
cg
parents: 13
diff changeset
    27
    ^ offset.
4560bb77bb36 checkin from browser
cg
parents: 13
diff changeset
    28
! !
4560bb77bb36 checkin from browser
cg
parents: 13
diff changeset
    29
1
083530508d9c intitial checkin
cg
parents:
diff changeset
    30
!JavaFieldref class methodsFor:'documentation'!
083530508d9c intitial checkin
cg
parents:
diff changeset
    31
083530508d9c intitial checkin
cg
parents:
diff changeset
    32
version
27
4560bb77bb36 checkin from browser
cg
parents: 13
diff changeset
    33
    ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaFieldref.st,v 1.5 1996/04/30 23:24:11 cg Exp $'
1
083530508d9c intitial checkin
cg
parents:
diff changeset
    34
! !