[perl.git] branch blead, updated. v5.13.5-27-g95d2461

[Tony Cook]

In perl.git, the branch blead has been updated

<http://perl5.git.perl.org/perl.git/commitdiff/95d2461a45d57edad79658a1445dd2cf2a6f086d?hp=1c2dcb3e90c4c27648790d3b93097c27b5af3cd4>

- Log -----------------------------------------------------------------
commit 95d2461a45d57edad79658a1445dd2cf2a6f086d
Author: Tony Cook <t...@develop-help.com>
Date:   Tue Sep 21 09:53:42 2010 +1000

    Add two (SV *) casts to placate C++.
-----------------------------------------------------------------------

Summary of changes:
 ext/XS-APItest/APItest.xs |    4 ++--
 1 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/ext/XS-APItest/APItest.xs b/ext/XS-APItest/APItest.xs
index dcdd84c..c6cac13 100644
--- a/ext/XS-APItest/APItest.xs
+++ b/ext/XS-APItest/APItest.xs
@@ -1289,7 +1289,7 @@ peep_record ()
     PREINIT:
        dMY_CXT;
     CODE:
-       RETVAL = newRV_inc(MY_CXT.peep_recorder);
+       RETVAL = newRV_inc((SV *)MY_CXT.peep_recorder);
     OUTPUT:
        RETVAL
 
@@ -1298,7 +1298,7 @@ rpeep_record ()
     PREINIT:
        dMY_CXT;
     CODE:
-       RETVAL = newRV_inc(MY_CXT.rpeep_recorder);
+       RETVAL = newRV_inc((SV *)MY_CXT.rpeep_recorder);
     OUTPUT:
        RETVAL
 

--
Perl5 Master Repository