File mp-2.0.1-matherr.patch of Package mingw32-ampl-mp
--- mp-2.0.1/src/asl/solvers/fpinitmt.c 2015-03-29 01:00:20.000000000 +0100
+++ mp-2.0.1/src/asl/solvers/fpinitmt.c 2015-04-27 09:05:46.024865237 +0200
@@ -217,27 +217,6 @@
#endif
#endif
-#ifndef NO_matherr
-#ifdef __MINGW32__
-#define matherr _matherr
-#endif
-
- matherr_rettype
-matherr( struct _exception *e )
-{
- switch(e->type) {
- case _DOMAIN:
- case _SING:
- errno = set_errno(EDOM);
- break;
- case _TLOSS:
- case _OVERFLOW:
- errno = set_errno(ERANGE);
- }
- return 0;
- }
-#endif /*NO_matherr*/
-
#ifdef Need_set_errno
static int