Differences From Artifact [78ba43410f]:
- File src/forwarding/forwarding-arm-elf.S — part of check-in [3695e89467] at 2013-12-25 00:01:08 on branch trunk — Make section .ctors "aw". (user: js, size: 2274) [annotate] [blame] [check-ins using]
To Artifact [81907b6d08]:
- File
src/forwarding/forwarding-arm-elf.S
— part of check-in
[0c332aa2d2]
at
2013-12-27 02:07:14
on branch trunk
— Rework forwarding API and ABI.
It matches the Apple API and ABI now and the forwarding handler itself
determines whether it should forward or not.This moves handling of +[resolve{Class,Instance}Method:] to the runtime
and allows adding new kinds of forwarding without changing the runtime.Also fixes a potential stack problem in the forwarding for MIPS. (user: js, size: 2806) [annotate] [blame] [check-ins using]
| ︙ | ︙ | |||
15 16 17 18 19 20 21 | */ .globl of_forward .globl of_forward_stret .section .text of_forward: | | | | | > > > > > > > > > > < > > > > > > > | > > > > > | < | | | > > > > > > > > > > > < > > > > > > > | > > > > > | 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 |
*/
.globl of_forward
.globl of_forward_stret
.section .text
of_forward:
stmfd sp!, {r0-r4, lr}
fstmfdd sp!, {d0-d7}
ldr r4, sel_forwardingTargetForSelector_$indirect_L0
.L0:
add r4, pc
bl object_getClass(PLT)
mov r1, r4
bl class_respondsToSelector(PLT)
cmp r0, #0
beq fail
ldr r0, [sp, #64]
mov r1, r4
bl objc_msg_lookup(PLT)
mov r12, r0
ldr r0, [sp, #64]
mov r1, r4
ldr r2, [sp, #68]
blx r12
cmp r0, #0
beq fail
ldr r1, [sp, #64]
cmp r0, r1
beq fail
str r0, [sp, #64]
ldr r1, [sp, #68]
bl objc_msg_lookup(PLT)
mov r12, r0
fldmfdd sp!, {d0-d7}
ldmfd sp!, {r0-r4, lr}
bx r12
fail:
fldmfdd sp!, {d0-d7}
ldmfd sp!, {r0-r4, lr}
b of_method_not_found(PLT)
.type of_forward, %function
.size of_forward, .-of_forward
of_forward_stret:
stmfd sp!, {r0-r4, lr}
fstmfdd sp!, {d0-d7}
ldr r4, sel_forwardingTargetForSelector_$indirect_L1
.L1:
add r4, pc
mov r0, r1
bl object_getClass(PLT)
mov r1, r4
bl class_respondsToSelector(PLT)
cmp r0, #0
beq fail_stret
ldr r0, [sp, #68]
mov r1, r4
bl objc_msg_lookup(PLT)
mov r12, r0
ldr r0, [sp, #68]
mov r1, r4
ldr r2, [sp, #72]
blx r12
cmp r0, #0
beq fail_stret
ldr r1, [sp, #68]
cmp r0, r1
beq fail_stret
str r0, [sp, #68]
ldr r1, [sp, #72]
bl objc_msg_lookup_stret(PLT)
mov r12, r0
fldmfdd sp!, {d0-d7}
ldmfd sp!, {r0-r4, lr}
bx r12
fail_stret:
fldmfdd sp!, {d0-d7}
ldmfd sp!, {r0-r4, lr}
b of_method_not_found_stret(PLT)
.type of_forward_stret, %function
.size of_forward_stret, .-of_forward_stret
init:
ldr r0, module_indirect_L2
.L2:
add r0, pc
|
| ︙ | ︙ |