g++ fixes

Message-Id: <20070115040930.8685843A67@anubis.hut.fi>

p4raw-id: //depot/perl@29812

1 files changed, 4 insertions, 2 deletions

diff --git a/op.c b/op.c
index f0f26dc4e6..40275ab472 100644
--- a/op.c
+++ b/op.c
@@ -3096,8 +3096,10 @@ Perl_pmtrans(pTHX_ OP *o, OP *expr, OP *repl)
 	    else if (j >= (I32)rlen)
 		j = rlen - 1;
 	    else {
-		tbl = PerlMemShared_realloc(tbl,
-					(0x101+rlen-j) * sizeof(short));
+		tbl = 
+		    (short *)
+		    PerlMemShared_realloc(tbl,
+					  (0x101+rlen-j) * sizeof(short));
 		cPVOPo->op_pv = (char*)tbl;
 	    }
 	    tbl[0x100] = (short)(rlen - j);