create t/re/speed.t, t/re/speed_thr.t

[perl5.git] / cv.h

diff --git a/cv.h b/cv.h
index c1f4456..8ba1c5c 100644 (file)
--- a/cv.h
+++ b/cv.h
@@ -270,6 +270,10 @@ typedef OP *(*Perl_call_checker)(pTHX_ OP *, GV *, SV *);
 
 #define CALL_CHECKER_REQUIRE_GV        MGf_REQUIRE_GV
 
+#ifdef PERL_CORE
+# define CV_UNDEF_KEEP_NAME    1
+#endif
+
 /*
  * Local variables:
  * c-indentation-style: bsd