diff options
author | Hugo van der Sanden <hv@crypt.org> | 2000-08-27 23:30:25 +0100 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2000-08-27 21:37:16 +0000 |
commit | fa0a540a9f4534c2df9fd85fb9e2977c36a7553c (patch) | |
tree | 451f17d56d3c74b639c30c9f2c971146fe25825a /lib | |
parent | cc96465714ccbfb445fc6ef8f31cccf3e846ae9d (diff) | |
download | perl-fa0a540a9f4534c2df9fd85fb9e2977c36a7553c.tar.gz |
workaround for xsubpp
Message-Id: <200008272130.WAA10083@crypt.compulink.co.uk>
p4raw-id: //depot/perl@6853
Diffstat (limited to 'lib')
-rwxr-xr-x | lib/ExtUtils/xsubpp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/ExtUtils/xsubpp b/lib/ExtUtils/xsubpp index 1e9ff45cc9..a7fe8603a9 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 }) )* |