From: Craig A. Berry Date: Sun, 4 Jan 2004 22:53:40 +0000 (-0600) Subject: future-proof signal check X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=dfc1d8886424c8cecb2f02982ff2ebcc36eb57c5;p=p5sagit%2Fp5-mst-13.2.git future-proof signal check From: "Craig A. Berry" Message-ID: <3FF8EDD4.3080308@mac.com> p4raw-id: //depot/perl@22057 --- diff --git a/configure.com b/configure.com index e32210f..7cf329d 100644 --- a/configure.com +++ b/configure.com @@ -5109,13 +5109,8 @@ $ WS " iss = ((iss&1)==1 && code == 0x1234);" $ WS " printf(""%d\n"",iss);" $ WS "}" $ CS -$ IF (F$EXTRACT(0,7,archname) .EQS. "VMS_AXP") -$ THEN -$ GOSUB compile -$ ELSE -$ ! Causes SS$_BADSTACK on OpenVMS I64 v8.1 (but hey, it was undocumented) -$ tmp = "0" -$ ENDIF +$ ON ERROR THEN CONTINUE +$ GOSUB compile $ IF tmp .EQS. "1" $ THEN $ echo4 "Yep, we can."