blob: 6ed201faa399441642be9a02375fcbf7da0099bb [file] [log] [blame]
%default { "load":"ldr", "barrier":"@ no-op ", "sqnum":"0" }
%verify "executed"
%verify "null object"
%verify "field already resolved"
%verify "field not yet resolved"
%verify "field cannot be resolved"
/*
* Jumbo 32-bit instance field get.
*
* for: iget/jumbo, iget-object/jumbo, iget-boolean/jumbo, iget-byte/jumbo,
* iget-char/jumbo, iget-short/jumbo
*/
/* exop vBBBB, vCCCC, field@AAAAAAAA */
FETCH(r1, 1) @ r1<- aaaa (lo)
FETCH(r2, 2) @ r2<- AAAA (hi)
FETCH(r0, 4) @ r0<- CCCC
ldr r3, [rSELF, #offThread_methodClassDex] @ r3<- DvmDex
orr r1, r1, r2, lsl #16 @ r1<- AAAAaaaa
ldr r2, [r3, #offDvmDex_pResFields] @ r2<- pDvmDex->pResFields
GET_VREG(r9, r0) @ r9<- fp[CCCC], the object pointer
ldr r0, [r2, r1, lsl #2] @ r0<- resolved InstField ptr
cmp r0, #0 @ is resolved entry null?
bne .L${opcode}_finish @ no, already resolved
8: ldr r2, [rSELF, #offThread_method] @ r2<- current method
EXPORT_PC() @ resolve() could throw
ldr r0, [r2, #offMethod_clazz] @ r0<- method->clazz
bl dvmResolveInstField @ r0<- resolved InstField ptr
b .L${opcode}_resolved @ resolved, continue
%break
/*
* Currently:
* r0 holds resolved field
* r9 holds object
*/
.L${opcode}_resolved:
cmp r0, #0 @ resolution unsuccessful?
beq common_exceptionThrown @ yes, throw exception
@ fall through to ${opcode}_finish
/*
* Currently:
* r0 holds resolved field
* r9 holds object
*/
.L${opcode}_finish:
@bl common_squeak${sqnum}
cmp r9, #0 @ check object for null
ldr r3, [r0, #offInstField_byteOffset] @ r3<- byte offset of field
beq common_errNullObject @ object was null
$load r0, [r9, r3] @ r0<- obj.field (8/16/32 bits)
$barrier @ acquiring load
FETCH(r2, 3) @ r2<- BBBB
FETCH_ADVANCE_INST(5) @ advance rPC, load rINST
SET_VREG(r0, r2) @ fp[BBBB]<- r0
GET_INST_OPCODE(ip) @ extract opcode from rINST
GOTO_OPCODE(ip) @ jump to next instruction