]> rtime.felk.cvut.cz Git - l4.git/blob - l4/pkg/uclibc/lib/contrib/uclibc/libm/s_matherr.c
Inital import
[l4.git] / l4 / pkg / uclibc / lib / contrib / uclibc / libm / s_matherr.c
1 /*
2  * ====================================================
3  * Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
4  *
5  * Developed at SunPro, a Sun Microsystems, Inc. business.
6  * Permission to use, copy, modify, and distribute this
7  * software is freely granted, provided that this notice
8  * is preserved.
9  * ====================================================
10  */
11
12 #include "math.h"
13 #include "math_private.h"
14
15 #ifndef _IEEE_LIBM
16
17 int matherr(struct exception *x)
18 {
19         int n=0;
20         if(x->arg1!=x->arg1) return 0;
21         return n;
22 }
23 libm_hidden_def(matherr)
24 #endif