From: Abe Timmerman <abe@ztreet.demon.nl>
Date: Fri, 3 Mar 2006 22:56:47 +0000 (+0100)
Subject: Re: [PATCH] include configure.com in Porting/checkcfgvar.pl
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=b89d399a31373fa709aa1afa4ee04b52768ea37b;p=p5sagit%2Fp5-mst-13.2.git

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
--- 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
--- 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 + "'"