freebsd-skq/lib/libc/mips/gen/fpgetmask.c
Warner Losh d7ee48f115 Bring in initial libc support for mips. These files were taken from
the OpenBSD tree and should be considered preliminary.  They are here
to facilitate building of the tree.
1999-03-03 07:06:17 +00:00

20 lines
297 B
C

/*
* Written by J.T. Conklin, Apr 11, 1995
* Public domain.
*/
#if defined(LIBC_SCCS) && !defined(lint)
static char rcsid[] = "$OpenBSD$";
#endif /* LIBC_SCCS and not lint */
#include <ieeefp.h>
fp_except
fpgetmask()
{
int x;
__asm__("cfc1 %0,$31" : "=r" (x));
return (x >> 7) & 0x1f;
}