Subversion Repositories planix.SVN

Rev

Rev 2 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
2 - 1
/* for VFP */
2
#define VMRS(fp, cpu) WORD $(0xeef00a10 | (fp)<<16 | (cpu)<<12) /* FP → arm */
3
#define VMSR(cpu, fp) WORD $(0xeee00a10 | (fp)<<16 | (cpu)<<12) /* arm → FP */
4
 
5
#define Fpscr 1
6
 
7
TEXT	setfcr(SB), $0
8
	VMSR(0, Fpscr)
9
	RET
10
 
11
TEXT	getfcr(SB), $0
12
	VMRS(Fpscr, 0)
13
	RET
14
 
15
TEXT	getfsr(SB), $0
16
	VMSR(0, Fpscr)
17
	RET
18
 
19
TEXT	setfsr(SB), $0
20
	VMRS(Fpscr, 0)
21
	RET