shithub: riscv

ref: 57d690c482c7e5f57608befe7cb04797b1bff153
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