14 lines
		
	
	
	
		
			143 B
		
	
	
	
		
			ArmAsm
		
	
	
	
	
	
			
		
		
	
	
			14 lines
		
	
	
	
		
			143 B
		
	
	
	
		
			ArmAsm
		
	
	
	
	
	
| / $Header$
 | |
| .text
 | |
| .globl and~
 | |
| 
 | |
| / size in r0
 | |
| and~:
 | |
| 	mov	(sp)+,r3
 | |
| 	mov	sp,r1
 | |
| 	add	r0,r1
 | |
| 	asr	r0
 | |
| 1:	com	(sp)
 | |
| 	bic	(sp)+,(r1)+
 | |
| 	sob	r0,1b
 | |
| 	jmp	(r3)
 |