ack/mach/i386/libem/iaar.s
1989-01-19 16:43:32 +00:00

20 lines
335 B
ArmAsm

.sect .text; .sect .rom; .sect .data; .sect .bss
.sect .text
.define .iaar
.iaar:
pop ecx
pop edx
cmp edx,4
.extern .unknown
jne .unknown
pop ebx ! descriptor address
pop eax ! index
pop edx ! array base
sub eax,(ebx)
mul 8(ebx)
mov ebx,edx
add ebx,eax
push ecx
ret