14 lines
		
	
	
	
		
			218 B
		
	
	
	
		
			ArmAsm
		
	
	
	
	
	
			
		
		
	
	
			14 lines
		
	
	
	
		
			218 B
		
	
	
	
		
			ArmAsm
		
	
	
	
	
	
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
 | 
						|
.define fef~
 | 
						|
.extern setfloat~
 | 
						|
! $Header$
 | 
						|
 | 
						|
fef~:
 | 
						|
	mov	(sp)+,r1
 | 
						|
	jsr	pc,setfloat~
 | 
						|
	movf	(sp),r0
 | 
						|
	movei	r0,-(sp)
 | 
						|
	movie	$0,r0
 | 
						|
	movf	r0,02(sp)
 | 
						|
	setd
 | 
						|
	jmp	(r1)
 |