IEEE math for the masses

Message-ID: <20050415141054.GA12749@mccoy.peters.homeunix.org>

(tests added to t/op/exp.t)

p4raw-id: //depot/perl@24371

1 files changed, 8 insertions, 0 deletions

diff --git a/pp.c b/pp.c
index d107ab5e2d..2ba5b61b29 100644
--- a/pp.c
+++ b/pp.c
@@ -35,6 +35,14 @@
 extern Pid_t getpid (void);
 #endif
 
+/*
+ * Some BSDs and Cygwin default to POSIX math instead of IEEE.
+ * This switches them over to IEEE.
+ */
+#if defined(LIBM_LIB_VERSION)
+    _LIB_VERSION_TYPE _LIB_VERSION = _IEEE_;
+#endif
+
 /* variations on pp_null */
 
 PP(pp_stub)