00001 /* @(#)s_matherr.c 5.1 93/09/24 */ 00002 /* 00003 * ==================================================== 00004 * Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved. 00005 * 00006 * Developed at SunPro, a Sun Microsystems, Inc. business. 00007 * Permission to use, copy, modify, and distribute this 00008 * software is freely granted, provided that this notice 00009 * is preserved. 00010 * ==================================================== 00011 */ 00012 00013 #if defined(LIBM_SCCS) && !defined(lint) 00014 static char rcsid[] = "$NetBSD: s_matherr.c,v 1.6 1995/05/10 20:47:53 jtc Exp $"; 00015 #endif 00016 00017 #include "math.h" 00018 #include "mathP.h" 00019 00020 #ifdef __STDC__ 00021 int matherr(struct exception *x) 00022 #else 00023 int matherr(x) 00024 struct exception *x; 00025 #endif 00026 { 00027 int n=0; 00028 if(x->arg1!=x->arg1) return 0; 00029 return n; 00030 }
1.3.8