From: Nicholas Clark <nick@ccl4.org>
Date: Fri, 29 Dec 2006 16:20:39 +0000 (+0000)
Subject: With xlow and xhigh as U32, PAD_MAX shouldn't be IV_MAX, as on a 64 bit
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=c8185ac54029b05b732120d080bda5abfdc295d5;p=p5sagit%2Fp5-mst-13.2.git

With xlow and xhigh as U32, PAD_MAX shouldn't be IV_MAX, as on a 64 bit
system this can't be stored.

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

diff --git a/pad.c b/pad.c
index cae1c02..37b056c 100644
--- a/pad.c
+++ b/pad.c
@@ -121,7 +121,7 @@ to be generated in evals, such as
 #define PARENT_FAKELEX_FLAGS_set(sv,val)	\
   STMT_START { ((XPVNV*)SvANY(sv))->xnv_u.xpad_cop_seq.xhigh = (val); } STMT_END
 
-#define PAD_MAX IV_MAX
+#define PAD_MAX I32_MAX
 
 #ifdef PERL_MAD
 void pad_peg(const char* s) {