diff options
| author | Robin Barker <RMBarker@cpan.org> | 2007-12-24 20:56:13 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2007-12-24 21:26:22 +0000 |
| commit | 1f36f092f89152cd3ffb1cb9d8754c1edcc4ab53 (patch) | |
| tree | dd3f8b2f161ac5adcc0c08f3647d9733d38dad66 /pp_hot.c | |
| parent | 27ceb5977435fd911083ce193382f26ccc3af24f (diff) | |
| download | perl-1f36f092f89152cd3ffb1cb9d8754c1edcc4ab53.tar.gz | |
PATCH re 32711
From: "Robin Barker" <Robin.Barker@npl.co.uk>
Message-ID: <46A0F33545E63740BC7563DE59CA9C6D0939A4@exchsvr2.npl.ad.local>
"IMO patch 32711 is better implemented using (the existing) NUM2PTR macro, as below/attached."
p4raw-id: //depot/perl@32720
Diffstat (limited to 'pp_hot.c')
| -rw-r--r-- | pp_hot.c | 3 |
1 files changed, 2 insertions, 1 deletions
@@ -1327,7 +1327,8 @@ 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*, (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) { |