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
openSUSE Build Service is sponsored by