/*      $NetBSD: fpsetprec.S,v 1.2 2014/05/22 15:01:56 uebayasi Exp $   */

/*
 * Written by Frank van der Linden at Wasabi Systems for NetBSD.
 * Public domain.
 */

#include <machine/asm.h>

/*
 * XXX set both the x87 control word and the SSE mxcsr register.
 * Applications should only set exception and round flags
 * via the fp*() interface, otherwise the status words
 * will get our of sync.
 */ 


#ifdef WEAK_ALIAS
WEAK_ALIAS(fpsetprec, _fpsetprec)
ENTRY(_fpsetprec)
#else
ENTRY(fpsetprec)
#endif
        fnstcw  -4(%rsp)

        andl    $3,%edi

        movl    -4(%rsp),%edx
        rorl    $8,%edx
        movl    %edx,%eax
        andl    $3,%eax

        andl    $~3,%edx
        orl     %edi,%edx
        roll    $8,%edx
        movl    %edx,-4(%rsp)

        fldcw   -4(%rsp)
        ret
#ifdef WEAK_ALIAS
END(_fpsetprec)
#else
END(fpsetprec)
#endif