From: Robin Barker <RMBarker@cpan.org>
Date: Wed, 11 Oct 2006 17:02:01 +0000 (+0100)
Subject: fix format errors; was RE: g++ compile and make test 100%
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=acff02b8767928cdbc04968102e70f115f9458f0;p=p5sagit%2Fp5-mst-13.2.git

fix format errors; was RE: g++ compile and make test 100%
From: "Robin Barker" <Robin.Barker@npl.co.uk>
Message-ID: <2C2E01334A940D4792B3E115F95B7226120A69@exchsvr1.npl.ad.local>

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

diff --git a/regcomp.c b/regcomp.c
index 821cb10..3b694cb 100644
--- a/regcomp.c
+++ b/regcomp.c
@@ -4601,7 +4601,7 @@ S_reg(pTHX_ RExC_state_t *pRExC_state, I32 paren, I32 *flagp,U32 depth)
 	            ARG2L_SET( ret, 0);
                     RExC_emit++;
 		    DEBUG_OPTIMISE_MORE_r(PerlIO_printf(Perl_debug_log,
-			"Recurse #%"UVuf" to %"IVdf"\n", ARG(ret), ARG2L(ret)));
+			"Recurse #%"UVuf" to %"IVdf"\n", (UV)ARG(ret), (IV)ARG2L(ret)));
 		} else {
 		    RExC_size++;
     		}
@@ -4883,7 +4883,7 @@ S_reg(pTHX_ RExC_state_t *pRExC_state, I32 paren, I32 *flagp,U32 depth)
 	    ret = reganode(pRExC_state, OPEN, parno);
 	    if (!SIZE_ONLY && RExC_seen & REG_SEEN_RECURSE) {
 		DEBUG_OPTIMISE_MORE_r(PerlIO_printf(Perl_debug_log,
-			"Setting paren #%"IVdf" to %d\n", parno, REG_NODE_NUM(ret)));
+			"Setting paren #%"IVdf" to %d\n", (IV)parno, REG_NODE_NUM(ret)));
 	        RExC_parens[parno-1]= ret;
 
 	    }