[perl.git] branch sprout/cvgv, updated. v5.21.3-617-g9c560c9

[Father Chrysostomos]

In perl.git, the branch sprout/cvgv has been updated

<http://perl5.git.perl.org/perl.git/commitdiff/9c560c988c6ee71109369e2cda8a8b10303c683d?hp=4eeb8e59dfc84b110c42e34f0d494bf4cdbc0f34>

- Log -----------------------------------------------------------------
commit 9c560c988c6ee71109369e2cda8a8b10303c683d
Author: Father Chrysostomos <spr...@cpan.org>
Date:   Fri Sep 12 20:19:28 2014 -0700

    fixup for ‘Avoid creating GVs’
-----------------------------------------------------------------------

Summary of changes:
 universal.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/universal.c b/universal.c
index 359c5977..825dff5 100644
--- a/universal.c
+++ b/universal.c
@@ -303,7 +303,7 @@ void
 Perl_croak_xs_usage(const CV *const cv, const char *const params)
 {
     /* Avoid CvGV as it requires aTHX.  */
-    const GV *const gv = CvNAMED(cv) ? NULL : cv->sv_any->xcv_gv_u.xcv_gv;
+    const GV *gv = CvNAMED(cv) ? NULL : cv->sv_any->xcv_gv_u.xcv_gv;
 
     PERL_ARGS_ASSERT_CROAK_XS_USAGE;
 

--
Perl5 Master Repository