From: Nicholas Clark <nick@ccl4.org>
Date: Sat, 22 Dec 2007 19:55:17 +0000 (+0000)
Subject: Remove warning about casting integer to different sized pointer.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=51310be14a8055c326c9ad74c096ae990fb988c8;p=p5sagit%2Fp5-mst-13.2.git

Remove warning about casting integer to different sized pointer.

p4raw-id: //depot/perl@32711
---

diff --git a/pp_hot.c b/pp_hot.c
index 57fa328..a2f9785 100644
--- a/pp_hot.c
+++ b/pp_hot.c
@@ -1327,7 +1327,7 @@ play_it_again:
 	     && !SvROK(TARG))	/* Cannot trust since INTUIT cannot guess ^ */
 	    goto yup;
     }
-    if (CALLREGEXEC(rx, (char*)s, (char *)strend, (char*)truebase, minmatch, TARG, INT2PTR(void*, gpos), r_flags))
+    if (CALLREGEXEC(rx, (char*)s, (char *)strend, (char*)truebase, minmatch, TARG, INT2PTR(void*, (UV)gpos), r_flags))
     {
 	PL_curpm = pm;
 	if (dynpm->op_pmflags & PMf_ONCE) {