Репозитории ALT
S: | 0.86-alt1 |
5.1: | 0.45-alt1 |
4.1: | 0.44-alt2.1 |
4.0: | 0.44-alt2.1 |
3.0: | 0.44-alt2.1 |
Группа :: Разработка/Perl
Пакет: perl-Inline
Главная Изменения Спек Патчи Sources Загрузить Gear Bugs and FR Repocop
Патч: perl-Inline-0.44-alt-our-vars.patch
Скачать
Скачать
--- Inline-0.44/C/lib/Inline/C/ParseRegExp.pm- 2002-11-04 21:39:52 +0000
+++ Inline-0.44/C/lib/Inline/C/ParseRegExp.pm 2004-05-15 17:14:19 +0000
@@ -21,9 +21,9 @@ sub code {
my $RE_comment_Cpp = q{(?:\/\*(?:(?!\*\/)[\s\S])*\*\/|\/\/[^\n]*\n)};
my $RE_quoted = (q{(?:(?:\")(?:[^\\\"]*(?:\\.[^\\\"]*)*)(?:\")}
.q{|(?:\')(?:[^\\\']*(?:\\.[^\\\']*)*)(?:\'))});
- our $RE_balanced_brackets =
+ our $RE_balanced_brackets; $RE_balanced_brackets =
qr'(?:[{]((?:(?>[^{}]+)|(??{$RE_balanced_brackets}))*)[}])';
- our $RE_balanced_parens =
+ our $RE_balanced_parens; $RE_balanced_parens =
qr'(?:[(]((?:(?>[^()]+)|(??{$RE_balanced_parens}))*)[)])';
# First, we crush out anything potentially confusing.