[PATCH] Prevent the tokenizer from segfaulting in debug mode when a FUNC token is forced

Could someone apply this ?
In case the patch isn't crystal clear, it prevents the tokenizer from
segfaulting in debug mode when a FUNC token is forced. Makes also the
debug report for forced tokens more explicit.

--- toke.c
+++ toke.c
@@ -1359,7 +1359,7 @@
 #ifdef DEBUGGING
     if (DEBUG_T_TEST) {
         PerlIO_printf(Perl_debug_log, "### forced token:\n");
-       tokereport(THING, &NEXTVAL_NEXTTOKE);
+       tokereport(type, &NEXTVAL_NEXTTOKE);
     }
 #endif
 #ifdef PERL_MAD

• [PATCH] Prevent the tokenizer from segfaulting in debug mode when a FUNC token is forced by Rafael Garcia-Suarez
• Re: [PATCH] Prevent the tokenizer from segfaulting in debug modewhen a FUNC token is forced by H.Merijn Brand