Change 27371 by [EMAIL PROTECTED] on 2006/03/03 17:49:01
Subject: [PATCH] include configure.com in Porting/checkcfgvar.pl
From: Abe Timmerman <[EMAIL PROTECTED]>
Date: Fri, 3 Mar 2006 18:43:24 +0100
Message-Id: <[EMAIL PROTECTED]>
Affected files ...
... //depot/perl/Porting/checkcfgvar.pl#3 edit
Differences ...
==== //depot/perl/Porting/checkcfgvar.pl#3 (text) ====
Index: perl/Porting/checkcfgvar.pl
--- perl/Porting/checkcfgvar.pl#2~25581~ 2005-09-23 06:46:40.000000000
-0700
+++ perl/Porting/checkcfgvar.pl 2006-03-03 09:49:01.000000000 -0800
@@ -6,7 +6,8 @@
# needed symbols are not lagging after how Configure thinks the world
# is laid out.
#
-# VMS is not handled here, due to their own rather elaborate DCL scripting.
+# VMS is probably not handled properly here, due to their own
+# rather elaborate DCL scripting.
#
use strict;
@@ -30,6 +31,7 @@
"win32/config.vc",
"win32/config.vc64",
"wince/config.ce",
+ "configure.com",
);
sub read_file {
@@ -84,6 +86,8 @@
read_file($cfg,
sub {
return if /^\#/ || /^\s*$/;
+ return if $cfg eq 'configure.com' &&
+ ! /^\$ WC "(\w+)='(.*)'"$/;
# foo='bar'
# foo=bar
# $foo='bar' # VOS 5.8.x specialty
@@ -93,6 +97,9 @@
}
elsif (/^\$?(\w+)=(.*)$/) {
$cfg{$1}++;
+ }
+ elsif (/^\$ WC "(\w+)='(.*)'"$/) {
+ $cfg{$1}++;
} else {
warn "$cfg:$.:$_";
}
End of Patch.
