getfcr.s

来自「这是一个同样来自贝尔实验室的和UNIX有着渊源的操作系统, 其简洁的设计和实现易」· S 代码 · 共 17 行

TEXT	setfcr(SB), $4
	MOVW	R0, FPCR
	RET

TEXT	getfcr(SB), $4
	MOVW	FPCR, R0
	RET

TEXT	getfsr(SB), $0
	MOVW	FPSR, R0
	RET

TEXT	setfsr(SB), $0
	MOVW	R0, FPSR
	RET