Re: [PATCH] include configure.com in Porting/checkcfgvar.pl

Message-Id: <200603032256.47170.abe@ztreet.demon.nl>

p4raw-id: //depot/perl@27374

diff --git a/Porting/checkcfgvar.pl b/Porting/checkcfgvar.pl
index cf14119..1db53d7 100644 (file)
--- a/Porting/checkcfgvar.pl
+++ b/Porting/checkcfgvar.pl
@@ -87,7 +87,7 @@ for my $cfg (@CFG) {
              sub {
                  return if /^\#/ || /^\s*$/;
                  return if $cfg eq 'configure.com' &&
-                           ! /^\$ WC "(\w+)='(.*)'"$/;
+                           ! /^\$\s+WC "(\w+)='(.*)'"$/;
                  # foo='bar'
                  # foo=bar
                  # $foo='bar' # VOS 5.8.x specialty
@@ -98,7 +98,7 @@ for my $cfg (@CFG) {
                  elsif (/^\$?(\w+)=(.*)$/) {
                      $cfg{$1}++;
                  }
-                 elsif (/^\$ WC "(\w+)='(.*)'"$/) {
+                 elsif (/^\$\s+WC "(\w+)='(.*)'"$/) {
                      $cfg{$1}++;
                  } else {
                      warn "$cfg:$.:$_";

diff --git a/configure.com b/configure.com
index 1e77f75..ceff46c 100644 (file)
--- a/configure.com
+++ b/configure.com
@@ -6242,9 +6242,7 @@ $ WC "shmattype='" + " '"
 $ WC "shortsize='" + shortsize + "'"
 $ WC "shrplib='define'"
 $ WC "sig_name='" + sig_name + "'"
-$ tmp = "sig_name_init='" + sig_name_init + "'"
-$ WC/symbol tmp
-$ DELETE/SYMBOL tmp
+$ WC "sig_name_init='" + sig_name_init + "'"
 $ WC "sig_num='" + sig_num + "'"
 $ WC "sig_num_init='" + sig_num_init + "'"
 $ WC "sig_count='" + sig_count + "'"