shithub: 9ferno

ref: b502a62da2ec6058923db94f87ecc2d29db2fa77
dir: /lib9/setfcr-OpenBSD-amd64.S/

View raw version

#define	FN(x)	.type x,@function; .global x; x
#define	ENT	subq $32, %rsp
#define	RET	addq $32, %rsp; ret

	.file	"setfcr-OpenBSD-amd64.S"
FN(setfcr):
	ENT
	xorb	$0x3f, %al
	movq	%rax, (%rsp)
	fwait
	fldcw	(%rsp)
	RET

FN(getfcr):
	ENT
	fwait
	fstcw	(%rsp)
	movw	(%rsp), %ax
	andq	$0xffffff, %rax
	xorb	$0x3f, %al
	RET

FN(getfsr):
	ENT
	fwait
	fstsw	(%rsp)
	movw	(%rsp), %ax
	andq	$0xffffff, %rax
	RET

FN(setfsr):
	fclex
	ret