[OK] Perl5.004_02 on Alpha NT

After applying the patch below, perl5.004_02 builds and passes
all tests 100% on Alpha NT with MSVC 4.2.

The patch simply wraps around the initialization code in
win32.c which calls _control87().

If desired, I can build a binary dist for Alpha NT based on
Sarathy's packlist for his.

Bill

p5p-msgid: 199708072100.OAA13141@ducks

diff --git a/win32/win32.c b/win32/win32.c
index 3d6048a71a131906d57d97a6f02fd70e1c07ec35..7a4c2852db19a9626195e7b5dd28f8c9d2a293c8 100644 (file)
--- a/win32/win32.c
+++ b/win32/win32.c
@@ -1625,5 +1625,7 @@ Perl_win32_init(int *argcp, char ***argvp)
      * want to be at the vendor's whim on the default, we set
      * it explicitly here.
      */
+#if !defined(_ALPHA_)
     _control87(MCW_EM, MCW_EM);
+#endif
 }