diff options
| author | Nicholas Clark <nick@ccl4.org> | 2009-02-07 19:25:38 -0600 |
|---|---|---|
| committer | Craig A. Berry <craigberry@mac.com> | 2009-02-07 19:25:38 -0600 |
| commit | 1f29050e2eb08bf295614d688f7af7d12afe73f6 (patch) | |
| tree | bc2725e707eec8a61c337fba7a20ea6d7568ee8d /configure.com | |
| parent | 902aaf3efe5ea7a7c69197eed2e2b4292ca6360c (diff) | |
| download | perl-1f29050e2eb08bf295614d688f7af7d12afe73f6.tar.gz | |
Data-Dumper --> Data/Dumper for VMS extension list as well.
Revised slightly and the effects of dash versus slash changed in the
list of exclusions.
Message-ID: <20090206211641.GA39741@plum.flirble.org>
Diffstat (limited to 'configure.com')
| -rw-r--r-- | configure.com | 25 |
1 files changed, 22 insertions, 3 deletions
diff --git a/configure.com b/configure.com index 3f3909cbc7..b2b28310a0 100644 --- a/configure.com +++ b/configure.com @@ -2731,11 +2731,30 @@ $ IF F$EXTRACT(0,7,xxx) .EQS. "Encode/" THEN goto ext_loop ! sub extension - $ IF xxx .EQS. "B/C" THEN goto ext_loop ! sub extension - omit $ IF F$EXTRACT(0,8,line) .EQS. "vms/ext/" THEN - xxx = "VMS/" + F$EXTRACT(8,line_len - 20,line) -$ known_extensions = known_extensions + " ''xxx'" +$! +$! (extspec = xxx) =~ tr!-!/! +$ extspec = "" +$ idx = 0 +$ replace_dash_with_slash: +$ before = F$ELEMENT(idx, "-", xxx) +$ IF before .EQS. "-" THEN goto end_replace_dash_with_slash +$ IF extspec .NES. "" +$ THEN +$ extspec = extspec + "/" +$ ENDIF +$ extspec = extspec + before +$ idx = idx + 1 +$ goto replace_dash_with_slash +$ +$ end_replace_dash_with_slash: +$ +$ known_extensions = known_extensions + " ''extspec'" $ goto ext_loop $end_ext: $ close CONFIG $ DELETE/SYMBOL xxx +$ DELETE/SYMBOL idx +$ DELETE/SYMBOL extspec $ known_extensions = F$EDIT(known_extensions,"TRIM,COMPRESS") $ dflt = known_extensions $ IF ccname .NES. "DEC" .AND. ccname .NES. "CXX" @@ -2745,10 +2764,10 @@ $ ENDIF $ dflt = dflt - "ByteLoader" ! needs to be ported $ dflt = dflt - "DB_File" ! needs to be ported $ dflt = dflt - "GDBM_File" ! needs porting/special library -$ dflt = dflt - "IPC-SysV" ! needs to be ported +$ dflt = dflt - "IPC/SysV" ! needs to be ported $ dflt = dflt - "NDBM_File" ! needs porting/special library $ dflt = dflt - "ODBM_File" ! needs porting/special library -$ dflt = dflt - "Sys-Syslog" ! needs porting/special library "GDBM_File macro LOG_DEBUG" +$ dflt = dflt - "Sys/Syslog" ! needs porting/special library "GDBM_File macro LOG_DEBUG" $ IF .NOT. Has_socketshr .AND. .NOT. Has_Dec_C_Sockets $ THEN $ dflt = dflt - "Socket" ! optional on VMS |