21 lines
		
	
	
	
		
			269 B
		
	
	
	
		
			ArmAsm
		
	
	
	
	
	
			
		
		
	
	
			21 lines
		
	
	
	
		
			269 B
		
	
	
	
		
			ArmAsm
		
	
	
	
	
	
.sect .text; .sect .rom; .sect .data; .sect .bss
 | 
						|
.sect .text
 | 
						|
.define .trp
 | 
						|
.define .stop
 | 
						|
.extern .trppc
 | 
						|
 | 
						|
		! ax is trap number
 | 
						|
.trp:
 | 
						|
	xor     bx,bx
 | 
						|
	xchg    bx,(.trppc)
 | 
						|
	test    bx,bx
 | 
						|
	jz      2f
 | 
						|
	push    ax
 | 
						|
	call    bx
 | 
						|
	pop     ax
 | 
						|
	ret
 | 
						|
2:
 | 
						|
	call	.stop
 | 
						|
 | 
						|
.stop:
 | 
						|
	jmp	EXIT
 |