18 lines
		
	
	
	
		
			201 B
		
	
	
	
		
			ArmAsm
		
	
	
	
	
	
			
		
		
	
	
			18 lines
		
	
	
	
		
			201 B
		
	
	
	
		
			ArmAsm
		
	
	
	
	
	
| .define strhp
 | |
| .sect .text
 | |
| .sect .rom
 | |
| .sect .data
 | |
| .sect .bss
 | |
| .sect .text
 | |
| 
 | |
| strhp:
 | |
| 	popl	RR2, *RR14
 | |
| 	pop	R0, *RR14
 | |
| 	cp	R0, R15
 | |
| 	jp	ULT, 1f
 | |
| 	push	*RR14, $EHEAP
 | |
| 	calr	trp
 | |
| 	jp	*RR2
 | |
| 1:
 | |
| 	ld	reghp, R0
 | |
| 	jp	*RR2
 |