diff options
| author | Craig A. Berry <craigberry@mac.com> | 2004-04-05 06:02:12 -0500 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2004-04-05 16:15:56 +0000 |
| commit | 20117e2c88bbab9ecc0a0dafd46471a000aa1ac6 (patch) | |
| tree | 8eaed44a07aea580899c107e48b09f7597c6e5f9 | |
| parent | 6865282ad318ef473baf3141addc54e5d931356c (diff) | |
| download | perl-20117e2c88bbab9ecc0a0dafd46471a000aa1ac6.tar.gz | |
Integrate:
[ 22656]
Subject: Re: perldelta584
Message-ID: <12587569.1081180932766.JavaMail.craigberry@mac.com>
(makes malloc wrap the default on VMS)
p4raw-link: @22656 on //depot/perl: dc9da78b70f004446f5a9327eea553687ad8c180
p4raw-id: //depot/maint-5.8/perl@22657
p4raw-integrated: from //depot/perl@22655 'merge in' configure.com
(@22637..)
| -rw-r--r-- | configure.com | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/configure.com b/configure.com index 84e5fd3bec..8600f24251 100644 --- a/configure.com +++ b/configure.com @@ -2509,13 +2509,10 @@ $ if (d_alwdeftype) then usedefaulttypes = "define" $! $! determine whether to use malloc wrapping $ echo "" -$ IF .NOT. usedevel .AND. usedevel .NES. "define" -$ THEN bool_dflt = "n" -$ ELSE bool_dflt = "y" -$ ENDIF +$ bool_dflt = "y" $ IF F$TYPE(usemallocwrap) .nes. "" $ then -$ if usemallocwrap .or. usemallocwrap .eqs. "define" then bool_dflt = "y" +$ if .NOT. usemallocwrap .or. usemallocwrap .eqs. "undef" then bool_dflt = "n" $ endif $ rp = "Do you wish to wrap malloc calls to protect against potential overflows? [''bool_dflt'] " $ GOSUB myread |