12 lines
		
	
	
	
		
			172 B
		
	
	
	
		
			ArmAsm
		
	
	
	
	
	
			
		
		
	
	
			12 lines
		
	
	
	
		
			172 B
		
	
	
	
		
			ArmAsm
		
	
	
	
	
	
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
 | 
						|
! $Header$
 | 
						|
.sect .text
 | 
						|
.define mon~
 | 
						|
 | 
						|
EBADMON = 031
 | 
						|
 | 
						|
mon~:
 | 
						|
	mov	$EBADMON,-(sp)
 | 
						|
	jsr	pc,trp~
 | 
						|
	tst	(sp)+
 | 
						|
	rts	pc
 |