From: Hugo van der Sanden <hv@crypt.org>
Date: Sun, 27 Aug 2000 22:30:25 +0000 (+0100)
Subject: workaround for xsubpp
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=fa0a540a9f4534c2df9fd85fb9e2977c36a7553c;p=p5sagit%2Fp5-mst-13.2.git

workaround for xsubpp
Message-Id: <200008272130.WAA10083@crypt.compulink.co.uk>

p4raw-id: //depot/perl@6853
---

diff --git a/lib/ExtUtils/xsubpp b/lib/ExtUtils/xsubpp
index 1e9ff45..a7fe860 100755
--- a/lib/ExtUtils/xsubpp
+++ b/lib/ExtUtils/xsubpp
@@ -300,7 +300,7 @@ sub check_keyword {
 	s/^(\s*)($_[0])\s*:\s*(?:#.*)?/$1/s && $2;
 }
 
-my ($C_group_rex, $C_arg);
+our ($C_group_rex, $C_arg);
 # Group in C (no support for comments or literals)
 $C_group_rex = qr/ [({\[]
 		   (?: (?> [^()\[\]{}]+ ) | (??{ $C_group_rex }) )*