shithub: riscv

ref: 17ebe55031ae6945ad1f671b69267a672328e4b1
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