xref: /openbsd-src/gnu/usr.bin/perl/qnx/qnx.c (revision 256a93a44f36679bee503f12e49566c2183f6181)
1 /* If we're compiling with watcom, we want to silence domain errors */
2 #if defined(__QNX__) && defined(__WATCOMC__)
3 #include <math.h>
4 
5 /* Return default value and print no error message */
matherr(struct exception * err)6 int matherr( struct exception *err )
7   {
8         return 1;
9   }
10 
11 #endif
12