diff options
| author | Jan Dubois <jand@activestate.com> | 2007-04-09 11:11:32 -0700 |
|---|---|---|
| committer | Steve Peters <steve@fisharerojo.org> | 2007-04-10 02:37:04 +0000 |
| commit | 514696afc3bc1e4034aaa7740aac33b09330fec7 (patch) | |
| tree | 974f9676c8995f7334322522f18e66b11d6093b9 /pp.h | |
| parent | 58d049f00f60aef7f74b8009451ce6d3c97fbf6b (diff) | |
| download | perl-514696afc3bc1e4034aaa7740aac33b09330fec7.tar.gz | |
Cast markstack values to I32
Message-ID: <prol131i8b27re246alnhmem4mj13fcl2b@4ax.com>
p4raw-id: //depot/perl@30879
Diffstat (limited to 'pp.h')
| -rw-r--r-- | pp.h | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -59,7 +59,7 @@ Refetch the stack pointer. Used after a callback. See L<perlcall>. STMT_START { \ if (++PL_markstack_ptr == PL_markstack_max) \ markstack_grow(); \ - *PL_markstack_ptr = (p) - PL_stack_base; \ + *PL_markstack_ptr = (I32)((p) - PL_stack_base);\ } STMT_END #define TOPMARK (*PL_markstack_ptr) @@ -68,7 +68,7 @@ Refetch the stack pointer. Used after a callback. See L<perlcall>. #define dSP SV **sp = PL_stack_sp #define djSP dSP #define dMARK register SV **mark = PL_stack_base + POPMARK -#define dORIGMARK const I32 origmark = mark - PL_stack_base +#define dORIGMARK const I32 origmark = (I32)(mark - PL_stack_base) #define ORIGMARK (PL_stack_base + origmark) #define SPAGAIN sp = PL_stack_sp |