make the jump point a little more obvious in a comment
authorYves Orton <demerphq@gmail.com>
Sat, 4 Dec 2010 13:48:13 +0000 (14:48 +0100)
committerYves Orton <demerphq@gmail.com>
Sat, 4 Dec 2010 13:48:13 +0000 (14:48 +0100)
regcomp.c

index 2df0a6e..5974fdb 100644 (file)
--- a/regcomp.c
+++ b/regcomp.c
@@ -4416,6 +4416,7 @@ Perl_re_compile(pTHX_ SV * const pattern, U32 pm_flags)
     RExC_utf8 = RExC_orig_utf8 = SvUTF8(pattern);
 
 
+    /****************** LONG JUMP TARGET HERE***********************/
     /* Longjmp back to here if have to switch in midstream to utf8 */
     if (! RExC_orig_utf8) {
        JMPENV_PUSH(jump_ret);