Note that nothing in core uses Perl_get_cv any more, and why it is hard to move

it to mathoms.c

1 files changed, 2 insertions, 0 deletions

diff --git a/perl.c b/perl.c
index fbf3e86afc..66411eea90 100644
--- a/perl.c
+++ b/perl.c
@@ -2529,6 +2529,8 @@ Perl_get_cvn_flags(pTHX_ const char *name, STRLEN len, I32 flags)
     return NULL;
 }
 
+/* Nothing in core calls this now, but we can't replace it with a macro and
+   move it to mathoms.c as a macro would evaluate name twice.  */
 CV*
 Perl_get_cv(pTHX_ const char *name, I32 flags)
 {