usurp GVOP slot for new PADOP (one small step to making optree

shareable across interpreters)

p4raw-id: //depot/perl@4484

1 files changed, 1 insertions, 1 deletions

diff --git a/regexec.c b/regexec.c
index c51ddeec74..1dbdc59f7b 100644
--- a/regexec.c
+++ b/regexec.c
@@ -1404,7 +1404,7 @@ Perl_regexec_flags(pTHX_ register regexp *prog, char *stringarg, register char *
 	    }
 	    break;
 	default:
-	    croak("panic: unknown regstclass %d", (int)OP(c));
+	    Perl_croak(aTHX_ "panic: unknown regstclass %d", (int)OP(c));
 	    break;
 	}
     }