19 lines
		
	
	
	
		
			229 B
		
	
	
	
		
			ArmAsm
		
	
	
	
	
	
			
		
		
	
	
			19 lines
		
	
	
	
		
			229 B
		
	
	
	
		
			ArmAsm
		
	
	
	
	
	
| .define	.cmp
 | |
| 
 | |
| 	.text
 | |
| .cmp:
 | |
| 	move.l	(sp)+,.savret	! return address
 | |
| 	move.l	d0,.savd0
 | |
| 	move.l	#1,d1
 | |
| 	move.l	(sp)+,d0
 | |
| 	cmp.l	(sp)+,d0
 | |
| 	bne	1f
 | |
| 	clr.l	d1
 | |
| 	1:
 | |
| 	bcs	2f
 | |
| 	neg.l	d1
 | |
| 	2:
 | |
| 	move.l	.savd0,d0
 | |
| 	move.l	.savret,-(sp)
 | |
| 	rts
 | |
| .align 2
 |