fpsetmask.c revision 1.2
1/* $OpenBSD: fpsetmask.c,v 1.2 2002/05/22 20:05:01 miod Exp $ */ 2 3/* 4 * Written by Miodrag Vallat. Public domain 5 */ 6 7#include <sys/types.h> 8#include <ieeefp.h> 9 10fp_except 11fpsetmask(mask) 12 fp_except mask; 13{ 14 u_int32_t fpsr; 15 fp_rnd old; 16 17 __asm__ __volatile__("fstw %%fr0,0(%1)" : "=m"(fpsr) : "r"(&fpsr)); 18 old = fpsr & 0x1f; 19 fpsr = (fpsr & 0xffffffe0) | (mask & 0x1f); 20 __asm__ __volatile__("fldw 0(%0),%%fr0" : : "r"(&fpsr)); 21 return (old); 22} 23