[svn:parrot] r38255 - trunk/config/auto/gmp

[Infinoid at svn.parrot.org]

Author: Infinoid
Date: Tue Apr 21 21:31:10 2009
New Revision: 38255
URL: https://trac.parrot.org/parrot/changeset/38255

Log:
[config] Work around RT #50212, by disabling the win32 crash dialog for the test.
It's still a strawberry issue and not a parrot one, but now it doesn't affect us, so I think this makes it closeable.

Modified:
   trunk/config/auto/gmp/gmp_c.in

Modified: trunk/config/auto/gmp/gmp_c.in
==============================================================================
--- trunk/config/auto/gmp/gmp_c.in	Tue Apr 21 21:28:29 2009	(r38254)
+++ trunk/config/auto/gmp/gmp_c.in	Tue Apr 21 21:31:10 2009	(r38255)
@@ -13,6 +13,16 @@
     mpz_t prime;
     char *s; int y;
 
+#ifdef WIN32
+    /* This is a workaround for RT #50212.
+     * Strawberry Perl builds GMP with SSE2 instructions, which some older classes of
+     * x86 processor can't handle.  This pops up an error dialog and waits for the user
+     * to click before proceeding with the rest of configure.
+     * This call disables that; copied from win32's Parrot_platform_init_code().
+     */
+    SetErrorMode(SEM_NOGPFAULTERRORBOX);
+#endif
+
     /* Calculate the 13th Mersenne prime 2^521 - 1 */
     mpz_init(prime);
     mpz_ui_pow_ui(prime, 2, 521);