diff options
| author | Yves Orton <demerphq@gmail.com> | 2006-09-29 14:41:26 +0200 |
|---|---|---|
| committer | H.Merijn Brand <h.m.brand@xs4all.nl> | 2006-09-29 12:29:24 +0000 |
| commit | f9f4320a413e57e41ac9bf0d94d8c4e8dbe71ec8 (patch) | |
| tree | 28f2158bf3db85ad65e1be291366af1df07fb5b6 /regcomp.pl | |
| parent | dfeee9b153e7ebbeaa1e263dad19a3e5a819bacd (diff) | |
| download | perl-f9f4320a413e57e41ac9bf0d94d8c4e8dbe71ec8.tar.gz | |
Re: [PATCH] Add hook for re_dup() into regex engine as reg_dupe (make re pluggable under threads)
Message-ID: <9b18b3110609290341p11767110sec20a6fee2038a00@mail.gmail.com>
p4raw-id: //depot/perl@28900
Diffstat (limited to 'regcomp.pl')
| -rw-r--r-- | regcomp.pl | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/regcomp.pl b/regcomp.pl index bfea6e25cd..2884971115 100644 --- a/regcomp.pl +++ b/regcomp.pl @@ -86,12 +86,14 @@ printf OUT <<EOP, #define %*s\t%d EOP --$width,REGNODE_MAX=>$lastregop-1,-$width,REGMATCH_STATE_MAX=>$tot-1; + -$width, REGNODE_MAX => $lastregop - 1, + -$width, REGMATCH_STATE_MAX => $tot - 1 +; $ind = 0; while (++$ind <= $tot) { my $oind = $ind - 1; - printf OUT "#define\t%*s\t%d\t/*%#04x %s*/\n", + printf OUT "#define\t%*s\t%d\t/* %#04x %s */\n", -$width, $name[$ind], $ind-1, $ind-1, $rest[$ind]; print OUT "\n\t/* ------------ States ------------- */\n\n" if $ind == $lastregop and $lastregop != $tot; @@ -150,7 +152,7 @@ print OUT <<EOP; }; #ifdef DEBUGGING -extern const char * const reg_name[] = { +const char * const reg_name[] = { EOP $ind = 0; |