diff options
| author | Nicholas Clark <nick@ccl4.org> | 2007-03-05 12:26:46 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2007-03-05 12:26:46 +0000 |
| commit | 2242947801b5a89c42ffba93b4c406f75e4cd049 (patch) | |
| tree | d5e69a16f0c5aa389527a08a3576fa689f78d09b /regcomp.pl | |
| parent | 9396c84faf040d3bed1ef186b6e6ce1fd26b8a19 (diff) | |
| download | perl-2242947801b5a89c42ffba93b4c406f75e4cd049.tar.gz | |
Change 30461 was wrong. As ext/re (re)builds the regexp engine with
-DDEBUGGING, it's going to need PL_reg_name even if core perl doesn't.
So something is always going to use it, so always define it, and always
export it. (But only define it once, so that static builds work.)
p4raw-id: //depot/perl@30464
Diffstat (limited to 'regcomp.pl')
| -rw-r--r-- | regcomp.pl | 8 |
1 files changed, 3 insertions, 5 deletions
diff --git a/regcomp.pl b/regcomp.pl index 89bbbe0271..38c346cc0c 100644 --- a/regcomp.pl +++ b/regcomp.pl @@ -161,10 +161,9 @@ print OUT <<EOP; /* reg_name[] - Opcode/state names in string form, for debugging */ -#ifdef DEBUGGING -# ifndef DOINIT +#ifndef DOINIT EXTCONST char * PL_reg_name[]; -# else +#else EXTCONST char * PL_reg_name[] = { EOP @@ -186,8 +185,7 @@ while (++$ind <= $tot) { print OUT <<EOP; }; -# endif /* DOINIT */ -#endif /* DEBUGGING */ +#endif /* DOINIT */ /* ex: set ro: */ EOP |