27 lines
		
	
	
	
		
			782 B
		
	
	
	
		
			ArmAsm
		
	
	
	
	
	
			
		
		
	
	
			27 lines
		
	
	
	
		
			782 B
		
	
	
	
		
			ArmAsm
		
	
	
	
	
	
	# $Header$
 | 
						|
	# revised version by CHL
 | 
						|
.globl .strlb
 | 
						|
	# Store the value that is on the stack in fp.
 | 
						|
	# Compute ap.
 | 
						|
.strlb:
 | 
						|
	movl	(sp)+,r3
 | 
						|
	movl	(sp)+,fp
 | 
						|
	pushl	r3
 | 
						|
	movl	$20,ap		# Compute argumentbase from local base.
 | 
						|
				# Distance is 5 longwords + the number of
 | 
						|
				# registers saved.
 | 
						|
	movl	4(fp),r3	# mask for saved registers
 | 
						|
	movl	$16,r2		# position of first bit to test
 | 
						|
L4:
 | 
						|
        subl3   r2,$28,r1       # remaining size of mask
 | 
						|
        ffs     r2,r1,r3,r2     # find first bit set in mask
 | 
						|
        beql    L5              # no more bits set
 | 
						|
        addl2   $4,ap           # for each saved register
 | 
						|
        incl    r2
 | 
						|
        jbr     L4
 | 
						|
L5:
 | 
						|
	extzv	$14,$2,6(fp),r3	# Now find out about the stack alignment
 | 
						|
				# between fp and ap
 | 
						|
	addl2	r3,ap		# add alignment
 | 
						|
	addl2	fp,ap
 | 
						|
	rsb
 |