From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Thu, 27 Dec 2001 14:15:27 +0000 (+0000)
Subject: Try to catch the SIGBUS, as suggested by Nicholas Clark.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=9958dc3c5a4566e3db5ff02a57527e0e18be4802;p=p5sagit%2Fp5-mst-13.2.git

Try to catch the SIGBUS, as suggested by Nicholas Clark.

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

diff --git a/Configure b/Configure
index 7110f31..30a2b37 100755
--- a/Configure
+++ b/Configure
@@ -20,7 +20,7 @@
 
 # $Id: Head.U,v 3.0.1.9 1997/02/28 15:02:09 ram Exp $
 #
-# Generated on Wed Dec 26 20:19:46 EET 2001 [metaconfig 3.0 PL70]
+# Generated on Thu Dec 27 17:16:22 EET 2001 [metaconfig 3.0 PL70]
 # (with additional metaconfig patches by perlbug@perl.org)
 
 cat >c1$$ <<EOF
@@ -13477,6 +13477,10 @@ $cat >try.c <<EOCP
 #define U32 $u32type
 #define BYTEORDER 0x$byteorder
 #define U8 $u8type
+#include <signal.h>
+#ifdef SIGBUS
+$signal_t bletch(s) int s; { exit(4); }
+#endif
 int main() {
 #if BYTEORDER == 0x1234 || BYTEORDER == 0x4321
     U8 buf[] = "\0\0\0\1\0\0\0\0";
@@ -13490,6 +13494,10 @@ int main() {
 
     fflush(stdout);
 
+#ifdef SIGBUS
+    signal(SIGBUS, bletch);
+#endif
+
     for (i = 0; i < 4; i++) {
 	up = (U32*)(buf + i);
 	if (! ((*up == 1 << (8*i)) ||   /* big-endian */