silence compiler warning - casting void* to IV
authorRobin Barker <rmbarker@cpan.org>
Tue, 10 Jul 2012 23:29:56 +0000 (00:29 +0100)
committerFather Chrysostomos <sprout@cpan.org>
Fri, 13 Jul 2012 16:31:58 +0000 (09:31 -0700)
This warns when void* and IV have different sizes
There is already a macro to do this conversion cleanly: PTR2IV

pp_ctl.c

index 54f17ae..826a772 100644 (file)
--- a/pp_ctl.c
+++ b/pp_ctl.c
@@ -3279,7 +3279,7 @@ Perl_find_runcv_where(pTHX_ U8 cond, void *arg, U32 *db_seqp)
                    if (CvROOT(cv) != (OP *)arg) continue;
                    return cv;
                case FIND_RUNCV_level_eq:
-                   if (level++ != (IV)arg) continue;
+                   if (level++ != PTR2IV(arg)) continue;
                    /* GERONIMO! */
                default:
                    return cv;