Define and initialise reg_name only once.

This allows re to be a static extension.
As it's now no-longer a static variable in regcomp.c, it needs a PL_
prefix.

p4raw-id: //depot/perl@30451

1 files changed, 2 insertions, 2 deletions

diff --git a/regexec.c b/regexec.c
index d1f6b8ec87..b9ac0a82fb 100644
--- a/regexec.c
+++ b/regexec.c
@@ -2485,7 +2485,7 @@ regmatch(), slabs allocated since entry are freed.
 	PerlIO_printf(Perl_debug_log,			    \
 	    "    %*s"pp" %s%s%s%s%s\n",			    \
 	    depth*2, "",				    \
-	    reg_name[st->resume_state],                     \
+	    PL_reg_name[st->resume_state],                     \
 	    ((st==yes_state||st==mark_state) ? "[" : ""),   \
 	    ((st==yes_state) ? "Y" : ""),                   \
 	    ((st==mark_state) ? "M" : ""),                  \
@@ -5008,7 +5008,7 @@ NULL
                     }
                     PerlIO_printf(Perl_error_log, "%*s#%-3d %-10s %s\n",
                         REPORT_CODE_OFF + 2 + depth * 2,"",
-                        curd, reg_name[cur->resume_state],
+                        curd, PL_reg_name[cur->resume_state],
                         (curyes == cur) ? "yes" : ""
                     );
                     if (curyes == cur)