12 lines
		
	
	
	
		
			159 B
		
	
	
	
		
			ArmAsm
		
	
	
	
	
	
			
		
		
	
	
			12 lines
		
	
	
	
		
			159 B
		
	
	
	
		
			ArmAsm
		
	
	
	
	
	
/ $Header$
 | 
						|
.text
 | 
						|
.globl aar~
 | 
						|
 | 
						|
/r0 : descriptor address
 | 
						|
/r1 : element number
 | 
						|
/base address is on stack
 | 
						|
aar~:
 | 
						|
	sub	(r0),r1
 | 
						|
	mul	04(r0),r1
 | 
						|
	add	r1,02(sp)
 | 
						|
	rts	pc
 |