Change 32720 by [EMAIL PROTECTED] on 2007/12/24 21:26:22
Subject: PATCH re 32711
From: "Robin Barker" <[EMAIL PROTECTED]>
Message-ID: <[EMAIL PROTECTED]>
Date: Mon, 24 Dec 2007 20:56:13 -0000
"IMO patch 32711 is better implemented using (the existing) NUM2PTR
macro, as below/attached."
Affected files ...
... //depot/perl/pp_hot.c#532 edit
Differences ...
==== //depot/perl/pp_hot.c#532 (text) ====
Index: perl/pp_hot.c
--- perl/pp_hot.c#531~32711~ 2007-12-22 11:55:17.000000000 -0800
+++ perl/pp_hot.c 2007-12-24 13:26:22.000000000 -0800
@@ -1327,7 +1327,8 @@
&& !SvROK(TARG)) /* Cannot trust since INTUIT cannot guess ^ */
goto yup;
}
- if (CALLREGEXEC(rx, (char*)s, (char *)strend, (char*)truebase, minmatch,
TARG, INT2PTR(void*, (UV)gpos), r_flags))
+ if (CALLREGEXEC(rx, (char*)s, (char *)strend, (char*)truebase,
+ minmatch, TARG, NUM2PTR(void*, gpos), r_flags))
{
PL_curpm = pm;
if (dynpm->op_pmflags & PMf_ONCE) {
End of Patch.
