1 1.2 perry /* $NetBSD: fpgetmask.c,v 1.2 1998/01/09 03:15:14 perry Exp $ */ 2 1.2 perry 3 1.1 jtc /* 4 1.1 jtc * Written by J.T. Conklin, Apr 10, 1995 5 1.1 jtc * Public domain. 6 1.1 jtc */ 7 1.1 jtc 8 1.1 jtc #include <ieeefp.h> 9 1.1 jtc 10 1.1 jtc fp_except 11 1.1 jtc fpgetmask() 12 1.1 jtc { 13 1.1 jtc int x; 14 1.1 jtc 15 1.1 jtc __asm__("st %%fsr,%0" : "=m" (*&x)); 16 1.1 jtc return (x >> 23) & 0x1f; 17 1.1 jtc } 18