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 /regnodes.h | |
| 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 'regnodes.h')
| -rw-r--r-- | regnodes.h | 8 |
1 files changed, 3 insertions, 5 deletions
diff --git a/regnodes.h b/regnodes.h index 2f21dd9971..6f6e0b262a 100644 --- a/regnodes.h +++ b/regnodes.h @@ -456,10 +456,9 @@ static const char reg_off_by_arg[] = { /* 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[] = { "END", /* 0000 */ "SUCCEED", /* 0x01 */ @@ -588,7 +587,6 @@ EXTCONST char * PL_reg_name[] = { "KEEPS_next", /* REGNODE_MAX +0x27 */ "KEEPS_next_fail", /* REGNODE_MAX +0x28 */ }; -# endif /* DOINIT */ -#endif /* DEBUGGING */ +#endif /* DOINIT */ /* ex: set ro: */ |