From: Steve Hay <SteveHay@planit.com>
Date: Thu, 14 Dec 2006 09:37:45 +0000 (+0000)
Subject: Silence a VC compiler warning
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=bfafaa29cebb5be440c3a86e7390b639134c6e78;p=p5sagit%2Fp5-mst-13.2.git

Silence a VC compiler warning

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

diff --git a/op.c b/op.c
index 66587c0..03f54b1 100644
--- a/op.c
+++ b/op.c
@@ -4595,7 +4595,7 @@ Perl_newFOROP(pTHX_ I32 flags, char *label, line_t forline, OP *sv, OP *expr, OP
 	LOOP *tmp;
 	NewOp(1234,tmp,1,LOOP);
 	Copy(loop,tmp,1,LISTOP);
-	S_op_destroy(aTHX_ loop);
+	S_op_destroy(aTHX_ (OP*)loop);
 	loop = tmp;
     }
 #else