shithub: riscv

ref: f88a55e79b5bf656e7f9578d1318a955b9a4963a
dir: /sys/src/ape/lib/9/sparc/getfcr.s/

View raw version
TEXT	getfsr(SB), $0
	SUB	$4, R1
	MOVW	FSR, (R1)
	MOVW	(R1), R7
	ADD	$4, R1
	RETURN

TEXT	setfsr(SB), $0
	SUB	$4, R1
	MOVW	R7, (R1)
	MOVW	(R1), FSR
	ADD	$4, R1
	RETURN

TEXT	setfcr(SB), $0
	SUB	$4, R1
	MOVW	R7, (R1)
	MOVW	(R1), FSR
	ADD	$4, R1
	RETURN

TEXT	getfcr(SB), $0
	SUB	$4, R1
	MOVW	FSR, (R1)
	MOVW	(R1), R7
	ADD	$4, R1
	RETURN