From 9dbc96cb5bce40f7c50cd0c8b770a804cca113ed Mon Sep 17 00:00:00 2001 From: Karl Williamson Date: Wed, 22 Aug 2012 14:50:43 -0600 Subject: [PATCH] PATCH: Devel::Peek doesn't compile under C++ Commit c9795579db61c900bacee2790bdceb7bad3dd45d introduced an error in C++: it's missing a cast. --- ext/Devel-Peek/Peek.xs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/ext/Devel-Peek/Peek.xs b/ext/Devel-Peek/Peek.xs index 027a4e8..28e0e83 100644 --- a/ext/Devel-Peek/Peek.xs +++ b/ext/Devel-Peek/Peek.xs @@ -54,7 +54,7 @@ DeadCode(pTHX) PerlIO_printf(Perl_debug_log, " busy\n"); continue; } - svp = PADLIST_ARRAY(padlist); + svp = (SV**) PADLIST_ARRAY(padlist); while (++i <= PADLIST_MAX(padlist)) { /* Depth. */ SV **args; -- 2.7.4