From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Wed, 27 Jun 2001 11:35:38 +0000 (+0000)
Subject: Catch FP exceptions also in z/OS (aka OS/390), from Peter Prymmer.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=eb3f6d219982f981ba1ce81b67a9b95bd33a6196;p=p5sagit%2Fp5-mst-13.2.git

Catch FP exceptions also in z/OS (aka OS/390), from Peter Prymmer.

p4raw-id: //depot/perl@10978
---

diff --git a/hints/os390.sh b/hints/os390.sh
index 4eff5a8..4f6f370 100644
--- a/hints/os390.sh
+++ b/hints/os390.sh
@@ -25,6 +25,8 @@ case "$ld" in
 esac
 
 # -DMAXSIG=38 maximum signal number
+# -DPERL_IGNORE_FPUSIG=SIGFPE allows Perl to be cavalier with FP overflow
+#   (particularly in numeric.c:S_mulexp10())
 # -DOEMVS is used in place of #ifdef __MVS__ in certain places.
 # -D_OE_SOCKETS alters system headers.
 # -D_XOPEN_SOURCE_EXTENDEDA alters system headers.
@@ -33,8 +35,8 @@ esac
 # -DEBCDIC should come from Configure and need not be mentioned here.
 # Prepend your favorites with Configure -Dccflags=your_favorites
 case "$ccflags" in
-'') ccflags='-DMAXSIG=38 -DOEMVS -D_OE_SOCKETS -D_XOPEN_SOURCE_EXTENDED -D_ALL_SOURCE -DYYDYNAMIC' ;;
-*) ccflags="$ccflags -DMAXSIG=38 -DOEMVS -D_OE_SOCKETS -D_XOPEN_SOURCE_EXTENDED -D_ALL_SOURCE -DYYDYNAMIC" ;;
+'') ccflags='-DMAXSIG=38 -DPERL_IGNORE_FPUSIG=SIGFPE -DOEMVS -D_OE_SOCKETS -D_XOPEN_SOURCE_EXTENDED -D_ALL_SOURCE -DYYDYNAMIC' ;;
+*) ccflags="$ccflags -DMAXSIG=38 -DPERL_IGNORE_FPUSIG=SIGFPE -DOEMVS -D_OE_SOCKETS -D_XOPEN_SOURCE_EXTENDED -D_ALL_SOURCE -DYYDYNAMIC" ;;
 esac
 
 # Turning on optimization breaks perl.